решите задачу по информатике плиз)
5-9 класс
|
Надеюсь, что задача та.
program _1;
var a:integer;
begin
writeln ('Введите номер месяца');
readln (a);
case a of
1: writeln ('Январь. Зима');
2: writeln ('Февраль. Зима');
3: writeln ('Март. Весна');
4: writeln ('Апрель. Весна');
5: writeln ('Май. Весна');
6: writeln ('Июнь. Лето');
7: writeln ('Июль. Лето');
8: writeln ('Август. Лето');
9: writeln ('Сентябрь. Осень');
10 :writeln ('Октябрь. Осень');
11: writeln ('Ноябрь. Осень');
12: writeln ('Декабрь. Зима');
else writeln ('Месяца с номером ',a,' не существует'):
end;
end.
Другие вопросы из категории
3 Как функционирует электронная почта?
местами наибольше элемент с наименьшим.Распечатать полученный
Var , , : ;
Begin
:=0;
For := to do
Begin
;
;
End;
Writeln(' =', );
End.
Там, где пробелы, вставить что нужно
в котором все элементы с нечётными номерами заменить на их квадратный корень.
Читайте также
задачи вместе; Петя решил на 2 задачи больше, чем Вася; Илья решил меньше задач, чем Коля; Никита решил больше задач, чем Илья, но меньше, чем Вася; каждый решил хотя бы по одной задаче.
Задача: Две
хозяйки купили 8 литров молока. У одной 5 литров в 6- литровом бидоне, у
другой 3 литра в 5 - литровом бидоне. Они решили разделить всё молоко
поровну, по 4 литра, пользуясь ещё одним, 2 - литровом бидоном. Как это
сделать?
Маша набирает текст со скоростью 40 символов в минуту,а Катя- 20 символов в минуту.Через какое время девочки введут одинаковое количество символов,если Катя начала набирать текст на 5 минут раньше?
Нужно решить без x! Спасибо
Сообщение занимает 4 страницы по 40 строк и содержит 720 байтов информации.Сколько символов в строке,если при составлении этого сообщения использовали 64-символьный алфавит.
Заранее благодарна!
Книга, набранная с помощью компьютера, содержит 5 страниц по 30 строк. Объем всего текста - 1500 байтов. Сколько символов в строке?