Есть ответ 👍

Найти количество натуральных чисел кратных 3 в отрезке от 1 до n.

263
306
Посмотреть ответы 2

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


Var a,b,n: integer; begin writeln('введите n'); readln(n); for a: =1 to n do begin if (a mod 3=0) then b: =b+1; end; writeln('количество чисел равняется ',b); end.
giunel041
4,7(75 оценок)

Треть от 100 кб. т.к. составляем пропорцию: 300*n=x кб 900*n=100 кб отсюда: x=1/3 от 100 кб.

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