Регистрация
tatyanakarp
10.05.2023 02:05
Информатика
Есть ответ 👍

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

236
380
Посмотреть ответы 2

Ответы на вопрос:

ele133pan11tov
ele133pan11tov
4,4(30 оценок)

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.

Алиса228228
Алиса228228
4,8(10 оценок)
1) var a,b: integer; begin readln(a,b); if a> b then writeln(a*2); if b> a then writeln(b*2); end. 2) var a: integer; begin readln(a); if a> 0 then writeln(a+10); if a< 0 then writeln(a-10); end. надеюсь на лучший ответ

Популярно: Информатика