Составьте программу, по которой будет реализован следующий сценарий: компьютер запрашивает номер дня недели, после ввода компьютер сообщает название этого дня. Например, если ввели 1, то выведется фраза "Это понедельник" и т. д...
Составьте
программу, по которой будет реализован
следующий сценарий: компьютер запрашивает
номер дня недели, после ввода компьютер
сообщает название этого дня. Например, если
ввели 1, то выведется фраза "Это понедельник" и
т. д. на примере ПАСКАЛЯ.
Гость
Ответ(ы) на вопрос:
ГостьProgram t;
var
a:integer;
begin
writeln('Vvedi nomer');
read(a);
if a=1 then writeln('PN')
else if a=2 then writeln('VT')
else if a=3 then writeln('SR')
else if a=4 then writeln('HT')
else if a=5 then writeln('PT')
else if a=2 then writeln('SB')
else if a=2 then writeln('VS')
end.
Гостьprogram natashka300198;
var i:char;
begin
write('i=');read(i);
case i of
'1': writeln('Понедельник');
'2': writeln('Вторник');
'3': writeln('Среда');
'4': writeln('Четверг');
'5': writeln('Пятница');
'6': writeln('Суббота');
'7': writeln('Воскресенье');
end;
end.
Не нашли ответ?
Похожие вопросы