Регистрация
Человекразумный0
20.11.2020 03:56
Информатика
Есть ответ 👍

Какие технические барьеры возникают при разработке стратегии, направленной на потребителя?

289
414
Посмотреть ответы 1

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

hohotuchka
hohotuchka
4,8(46 оценок)

Program Zadacha;

Const c = 4; max = 50;

Var a, b: Integer;

Begin

a := c;

While a < max Do

Begin

If a Mod c = 0 Then

b := b + a;

a := a + 1;

End;

WriteLn('Сума чисел, кратних ', c, ' і менше ', max, ' становить ', b);

ReadLn;

End.

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