Запиши верный ответ (без пробелов).

Write ('h = ', h);

Для h=25 на экране будет

нельзя, ведь текст отсканирован а не скопирован!

var x1,x2,x3,x4,x5: integer;

s: real;

begin

  read(x1,x2,x3,x4,x5);

  s: = (x1+x2+x3)/(x4+x5);

  if round(s)=s then writeln("celoe - "s);

end.

человек

вычислять

воспринимать

закодировать

напечатать

декодировать

понять

обработать

обучить

передать

сохранить

бежать

компьютер

вычислять

закодировать

напечатать

декодировать

обработать

обучить

передать

сохранить

человек может все, а комп кой че не может)

var a,s: integer; begins: =0; writeln('введите числа'); repeatreadln(a); if (a> 9)and(a< 99) thens: =s+a; until a=0; writeln(s); end.