78

Паскаль. 1. Заполнить массив из 10 элементов случайными числами…

serrrgun 12 марта 2023

Паскаль. 1. Заполнить массив из 10 элементов случайными числами в интервале [-10… 10] и найти сумму элементов больших числа к введенного склавиатуры

категория: информатика

88

Var a: array [0… 9] of integer; i, b, c: integer; begin readln (b); for i: =0 to 9 do begin a[i]: =random (20) — 10; if (a[i] > b) then c: =c+a[i]; end; writeln (c); end.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...