Найти сумму элементов массива х = (3.5; -6.3; 2.1; 0.1; 5.1; -2.1), значения которых меньше 0.25 к данному составить алгоритм и написать программу на языке pascal

margo2200078 margo2200078    2   30.03.2019 07:30    0

Ответы
соннышко соннышко  27.05.2020 16:01

uses crt;
const
a:array[1..6] of real=(3.5, -6.3, 2.1, 0.1, 5.1, -2.1);
var
i:integer;
sum:real;
begin
for i:=1 to 6 do
if a[i]<0.25 then sum:=sum+a[i];
write(sum);
end.

Это блок-схема


Найти сумму элементов массива х = (3.5; -6.3; 2.1; 0.1; 5.1; -2.1), значения которых меньше 0.25 к д
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика