Вопрос по информатике:
(турбо паскаль) задача: запрашивает мое фамилию имя, фамилию имя друга, выдать фразу кто по списку в журнале раньше. помогите пожалуйста очень нужно, заранее спасибо!
- 15.04.2016 17:31
- Информатика
- remove_red_eye 15507
- thumb_up 26
Ответы и объяснения 1
//Pascal ABC.NET v3.0 сборка 1111
var
s1,s2:string;
c1,c2:char;
begin
writeln('Enter your name:');
readln(s1);
c1:=s1[1];
writeln('Enter friend name:');
readln(s2);
c2:=s2[1];
if c1>c2 then writeln('You') else writeln('Friend');
end.
Пример работы:
Enter your name:
Глеб
Enter friend name:
Юлия
Friend
- 16.04.2016 13:46
- thumb_up 48
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.