Паскаль. Оператор выбора.

Дано натуральное число N (N<100), что означает возраст человека в годах. Дать для этого числа наименование: "год", "года", "лет".

Question

Информатика

Костюра

7 августа, 08:52

Паскаль. Оператор выбора.

Дано натуральное число N (N<100), что означает возраст человека в годах. Дать для этого числа наименование: "год", "года", "лет".

+1

Ответы (1)

Знаете ответ на вопрос?

Светланыч · Answer 1

Var

n:integer;

s:string;

begin

readln (n) ;

case n mod 10 of

1:s:=' год';

2 ... 4:s:=' года';

0,5 ... 9:s:=' лет';

end;

case n mod 100 of 11 ... 19:s:=' лет';

end;

writeln (n, s) ;

end.

Паскаль. Оператор выбора.Дано натуральное число N (N<100), что означает возраст человека в годах. Дать для этого числа наименование: "год", "года", "лет".

Паскаль. Оператор выбора.

Дано натуральное число N (N<100), что означает возраст человека в годах. Дать для этого числа наименование: "год", "года", "лет".