VanilRio
22.03.2020 14:35

Составить программу которая считывает 6 чисел и найти сумму неотрицательных чисел.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Винасуэлла
09.10.2020 14:50

var i,a,sum:longint;


begin

sum:=0;


for i:=1 to 6 do begin readln(a); if(a>0) then sum:=sum+a; end;


writeln(sum);


end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота