Регистрация
noname1372321
14.11.2021 21:00
Информатика
Есть ответ 👍

Ввести с клавиатуры последовательность из n элементов. найти сумму положительных элементов, значения которых не превышают 2. вывести найденные сумму и количество. ( программирование на языке pascal )/

190
359
Посмотреть ответы 2

Ответы на вопрос:

артемка2277777
артемка2277777
4,6(37 оценок)
Var n,i,k: integer; a: array[1..4096] of integer; begin readln(n); for i: =1 to n do begin readln(a[i]); if (a[i]< =2) and (a[i]> 0)  then k: =k+a[i]; end; writeln('summa = ',k); end.
Uknowmyname
Uknowmyname
4,8(89 оценок)

решение по действиям на фото.


28%5=? найдите ответ

Популярно: Информатика