Question

информатика
9-й класс

Answer 1

var a,b,c:integer;
begin
read(a,b,c);
if (a<b) and (b<c) then
write('да')
else
write('нет');
end.

Answer 2

Пиши давай и 4. Ответ считается неполным.

Answer 3

щя

Answer 4

var a:integer;
begin
write('Ведите номер месяца:');
read(a);
case a of
1,12,2:write('Зима');
3,4,5:write('Весна');
6,7,8:write('Лето');
9,10,11:write('Осень');
end;
end.

Answer 5

во

Answer 6

Хорошо