Помогите,пожалуйста 9 чисел выбрасываются случайным образом из отрезка от - 2 до 10. Подсчитать сумму чисел больше 2 и вывести на экран.
Помогите,пожалуйста
9 чисел выбрасываются случайным образом из отрезка от - 2 до 10. Подсчитать сумму чисел > 2 и вывести на экран.
Гость
Ответ(ы) на вопрос:
Гостьconst N = 9;
var a: array[1..N] of integer;
i, sum: integer;
begin
sum := 0;
for i := 1 to N do begin
a[ i ] := random(12)-2;
write(a[i]:4);
if a[ i ] > 2 then sum := sum + a[ i ];
end;
writeln();writeln();
write(' Сумма всех чисел > 2: ', sum);
end.
Не нашли ответ?
Похожие вопросы