Информатика, опубликовано 2018-08-22 21:06:48 by Гость

задачи на оператора выбора. составить программу к задаче: Для целого числа k от 1 до 99 напечатать фразу "Мне k лет",учитывая что может быть "лет","год" ,"года"

Ответ оставил Гость

uses crt;
var r: byte;
begin
readln(к);
write(Мне ,к);
if r in [5..20] then write( лет) else
  case к mod 10 of
1: write( год);
2..4: write( года);
5..9,0: write( лет);
else

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.