Даны три числа определить количество чисел больших семи

Question

Даны три числа определить количество чисел больших семи

Comments

Язык прграммирования?

---

ответ пожалста !)

---

Так на чём написать программу то? Я ж не знаю наперед

---

Pascal, C++, QBasic??

---

Pascal abc

---

всё

---

благодарю !!!

Answer 1

Program p1;
var a,b,c,d:integer;
begin
writeln('Введите первое число');readln(a);
writeln('Введите второе число');readln(b);
writeln('Введите третье число');readln(c);
if(a>7) then d:=d+1;
if(b>7) then d:=d+1;
if(c>7) then d:=d+1;
writeln('К-во чисел > 7: ',d);
end.