Дано три числа x, y, z. вычислить количество чисел больших 7.

fatowka84 fatowka84    3   17.05.2019 13:20    1

Ответы
вниомаомылт вниомаомылт  30.09.2020 19:15

var

  x, y, z : real;

  k : byte;

begin

  read (x, y, z);

  k := 0;

  if x > 7 then inc (k);

  if y > 7 then inc (k);

  if z > 7 then inc (k);

  writeln (k);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика