Регистрация
alexeygutorov
20.04.2023 01:22
Информатика
Есть ответ 👍

Вычислите сумму квадратов четных натуральных чисел. решите ,на abc паскале.

266
314
Посмотреть ответы 2

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

klanana
klanana
4,5(11 оценок)

var

i, s, n: integer;

 

begin

 

write('введите последнее натуральное число (счет идет от 1 до n): ');

readln(n);

 

for i: =1 to n do

if i mod 2=0 then

 

begin

s: =sqr(i);

writeln(i,' ');

end;

 

end.

masha12566
masha12566
4,6(36 оценок)
Там когда сделаешь круг и остановишься там есть точки маленькие и так можно увеличить маштаб круга и ещё в паинте можно отменить все действия.

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