1.с клавиатуры вводится 3 числа. найти сумму только из положительных чисел. (тема: программирование ветвлящихся и цепленных алгоритмов) 2.дано двухзначное число,найти сумму и произведение его чисел. (2-ая решается с div и mod) (тема: программирование ветвлящихся и цепленных алгоритмов )

vaporen vaporen    1   30.05.2019 01:20    1

Ответы
prasolovadd prasolovadd  29.06.2020 16:51
1)
program qq;
var a,b,c,d:integer;
begin
read(a,b,c);
d:=0;
if a>0 then d:=d+a;
if b>0 then d:=d+b;
if c>0 then d:=d+c;
writeln(d);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика