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

0 голосов
26 просмотров

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


image

Информатика (20 баллов) | 26 просмотров
Дан 1 ответ
0 голосов

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

(34 баллов)
0

эт 3

0

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

0

щя

0

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.

0

во

0

Хорошо