Другие предметы, опубликовано 2018-08-22 23:35:53 by Гость
Помогите сделать информатикуу!! Система паскаль Ничего не понятно :( _По номеру квартала определить принадлежащие ему названия месяцев_
Ответ оставил Гость
Var
num:integer;
begin
writeln(Введите номер квартала);
readln(num);
case num of
1:writeln(Январь, февраль, март);
2:writeln(Апрель, май, июнь);
3:writeln(Июль, август, сентябрь);
4:writeln(Октябрь, ноябрь, декабрь);
end;
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Другие предметы.
Форма вопроса доступна на