Регистрация
borisovak468
20.01.2023 03:38
Информатика
Есть ответ 👍

Найти сумму первых семи чисел кратных 3 в pascal abc

200
392
Посмотреть ответы 2

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

albinasaydilova
albinasaydilova
4,8(53 оценок)
Program summa; uses crt; var a,b,c,d: integer; begina: =7; b: =3*a; c: =0; for d: =1 to b do beginif d mod 3 = 0 then  c: =c+d; end; writeln('ответ = ',d); end.
Oleg009988
Oleg009988
4,5(55 оценок)

Да это легко не более 3

не благодари брат)

Объяснение:

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