Как нарисавать зонт в очень надо и еще чтоб линии на зонтики были разного цвета
189
248
Ответы на вопрос:
var a,b,c,s: integer;
begin
readln(a,b,c);
s: =0;
if (a> 0) then s: =s+a;
if (b> 0) then s: =s+b;
if (c> 0) then s: =s+c;
writeln(s);
end.
Популярно: Информатика
-
ФамилГасанов02.09.2021 20:28
-
srs777s01.05.2021 10:04
-
валерия82114.05.2021 01:12
-
marija0102124.03.2022 19:55
-
natalipanshina18.11.2020 16:56
-
aaalino4ka25.06.2020 01:09
-
Kol07L0705.09.2022 14:33
-
Ali8the8Emperor06.03.2022 10:16
-
Артём44646017.01.2022 02:32
-
Yuki1627.04.2021 14:02