Помогите сделать информатикуу!! Система паскаль
Ничего не понятно :(
_По номеру квартала определить принадлежащие ему названия месяцев_
Var
num:integer;
begin
writeln(Введите номер квартала);
readln(num);
case num of
1:writeln(Январь, февраль, март);
2:writeln(Апрель, май, июнь);
3:writeln(Июль, август, сентябрь);
4:writeln(Октябрь, ноябрь, декабрь);
end;
end.
Оцени ответ
