Информатика, опубликовано 2018-08-22 23:44:02 by Гость

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

Ответ оставил Гость

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.

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.