Введите число от 1 до 7.если 1 - понедельник,если 2 - вторник и т.д.вывести все это на pascal abc

zhanym2 zhanym2    1   28.05.2019 04:10    1

Ответы
курррва228 курррва228  25.06.2020 14:16
Тоесть нужно составить программу,которая по заданному числу от 1 до 7, выводит название соответствующего ему дня?
ПОКАЗАТЬ ОТВЕТЫ
tatu261 tatu261  25.06.2020 14:16
Var i:integer;
begin
 writeln('Введите число от 1 до 7');
 readln(i);
 case i of 
 1:writeln('Понедельник');
 2:writeln('Вторник');
 3:writeln('Среда');
 4:writeln('Четверг');
 5:writeln('Пятница');
 6:writeln('Суббота');
 7:writeln('Воскресенье');
 end;
readln;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика