Предмет: Информатика,
автор: syk1
информатика
9-й класс
Приложения:
Ответы
Автор ответа:
0
var a,b,c:integer;
begin
read(a,b,c);
if (a<b) and (b<c) then
write('да')
else
write('нет');
end.
begin
read(a,b,c);
if (a<b) and (b<c) then
write('да')
else
write('нет');
end.
kubanychbekuulubaiys:
эт 3
Пиши давай и 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.
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.
во
Хорошо
Похожие вопросы
Предмет: Алгебра,
автор: zamed
Предмет: Литература,
автор: Darina20091610
Предмет: Геометрия,
автор: paukibragim
Предмет: Информатика,
автор: dako13