Напишите блок схему. умоляю скорее !
program pr1;
var i,b: integer; a,s: real;
begin
readln(b);
for i: =1 to b-9 do
begin
readln(a);
if (a mod 3 = 0) and (a mod 2 < > 0) then
s: =s+a;
end;
writeln(s);
end.
216
464
Ответы на вопрос:
Популярно: Информатика
-
damilyaelesheva22.03.2020 19:08
-
skrlp123429.11.2020 17:43
-
ladysweet118.04.2021 05:54
-
ksenyaLove124602.12.2021 08:25
-
Horse333310.11.2020 14:26
-
propprap21.10.2021 10:31
-
sofiapel68p08lqa29.12.2020 14:25
-
edvi0123.01.2020 04:04
-
Настя1211197819.04.2021 00:45
-
546546YGygY22.05.2021 19:09