Предмет: Информатика, автор: kokorevicavioleta

Количество дней 12
Какой год

Ответы

Автор ответа: Dilorf
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.

хз, может так

Похожие вопросы
Предмет: Русский язык, автор: mirzemetbalamet