Для n произвольно введённых чисел с клавиатуры вычислить - вопрос №3741204 от kirill994 13.01.2023 15:10

Question

Информатика: Для n произвольно введённых чисел с клавиатуры вычислить сумму тех , которые больше , чем заданное число а . нужно

kirill994 · Answer

var i,A,n,sum,v:integer;beginwrite( Введите заданное А ); readln(A);write( Введите число вводов n ); readln(n);for i:= 1 to n dobeginwrite( Введите число ); readln(v);if v A  then sum:= sum +v;end;write( Сумма = , sum);end....