Program n_5;
var
a: integer;
procedure Error;
begin
write('ERROR');
exit;
end;
begin
write('Введите номер месяца - ');
readln(a);
if (a <= 0) or (a > 12) then
Error
else
if (a = 12) or (a = 1) or (a = 2) then
write('Зима')
else
if (a = 3) or (a = 4) or (a = 5) then
write('Весна')
else
if (a = 6) or (a = 7) or (a = 8) then
write('Лето')
else
if (a = 9) or (a = 10) or (a = 11) then
write('Осень');
end.
V = U*T
U = 9216 байт/сек = 9 КБ/сек
T = 1 мин = 60 сек
V = 9 * 60 = 540 КБ
--------------------------------------
V - объем файла
U - скорость передачи данных
T - время
Галочка вниз-дизъюнкция,это и есть сложение
1-2 - Да
2-1 - Нет
3-3- Да
Очень лёгкий вопрос как по мне.