Что такое «вычислительный эксперимент»? Приведите пример.

Question

Информатика: Что такое «вычислительный эксперимент»? Приведите пример.

vasilevasanka · Accepted Answer

Вроде так:

var b, c: integer;
begin
Writeln('Введите ваш возраст');
Readln(b);
  if b <= 0 then WriteLn('Вам 0 лет')
  else begin
c := b mod 100;
if (c >= 10) and (c <= 20) then WriteLn('Вам ', b, ' лет')
else
  case (b mod 10) of
1: WriteLn('Вам ', b, ' год');
2..4: WriteLn('Вам ', b, ' года');
5..9, 0: WriteLn('Вам ', b, ' лет')
  end;
end;
Writeln('Для выхода нажмите <Enter>');
Readln;
end.

MOGZ ответил