Предмет: Информатика,
автор: kokorevicavioleta
Количество дней 12
Какой год
Ответы
Автор ответа:
1
Ответ:
program 123;
uses crt;
var x:integer;
begin
repeat
write('Введите номер месяца: ');
readln(x);
case x of
writeln('Дней - 31');
writeln('Дней - 28');
writeln('Дней - 31');
writeln('Дней - 30');
writeln('Дней - 31');
writeln('Дней - 30');
writeln('Дней - 31');
writeln('Дней - 31');
writeln('Дней - 30');
writeln('Дней - 31');
writeln('Дней - 30');
writeln('Дней - 31');
end;
until x=13;
readln;
end.
хз, может так
Похожие вопросы
Предмет: Русский язык,
автор: 111111136
Предмет: Русский язык,
автор: aniskina1986
Предмет: Окружающий мир,
автор: sashokTube
Предмет: Русский язык,
автор: mirzemetbalamet