лабы паскаль

[pasha_invoker]

вижуал басик в универе лол

а задачка изи же

автор рак

ответ 42

[Nekon]

а причем тут программирование? Тут чистая математика

[CocaCola]

UP

UP

UP

 

 

 

Вычислить сумму всех чисел от 1 до M, которые кратны 3. Число, кратное 3,

делится на 3 нацело.

 

helpmeplz

[Gomosek]

Лабок мне сначала поласкай

[XpoHuK]

UP

UP

UP

 

 

 

Вычислить сумму всех чисел от 1 до M, которые кратны 3. Число, кратное 3,

делится на 3 нацело.

 

helpmeplz

Ты мне ещё за прошлую свою мамку должен. Сестра есть?

[AskMe-]

дед смотри, хроник запостил

[StandAndGo]

лол

[gooner]

Учусь на строителя , ничем не могу помочь.

[Гайка]

UP

UP

UP

 

 

 

Вычислить сумму всех чисел от 1 до M, которые кратны 3. Число, кратное 3,

делится на 3 нацело.

 

helpmeplz

Хуй тебе не отсосать уёбок, сам всё делай бич, впитывай образование, считай вручную, питон ебаный.

[rogogo]

Ого, гайка вернулся, пацаны

 

пошел нахуй уебок тупой

 

[Kant]

var summ, M, i:integer;
readln(M);

summ := 0;
for i := 1 to M do
if (i mod 3 = 0)
	summ := summ + i;

writeln(summ);

[Gomosek]

Ахахаххаха. Как только

 

 

5 пользователей, 3 гостей, 0 невидимых

Gomosek, DTS|XPEH, SOSKI-_-KROTA, Kant, CHUMAZIG

 

Так сразу:

 

 

var summ, M, i:integer;
readln(M);

summ := 0;
for i := 1 to M do
if (i mod 3 = 0)
	summ := summ + i;

writeln(summ);

 

Блять :lol:

Ну Кант, ну красава :lol:

[GOGOMEL]

аххаах и вправду

[rogogo]

Гомосек :pray: :pray:

[Kant]

лол