1. Квадрат трехзначного числа оканчивается тремя цифрами, которые как раз и составляют это число. Найти такие числа (например, 625: 625^2=390 625).

2. Найти сумму целых положительных чисел, больших 20, меньших 100, кратных 3 и заканчивающихся на 2,4 или 8.

Решить в Паскале

Question

Информатика

Анисий

25 июля, 05:46

1. Квадрат трехзначного числа оканчивается тремя цифрами, которые как раз и составляют это число. Найти такие числа (например, 625: 625^2=390 625).

2. Найти сумму целых положительных чисел, больших 20, меньших 100, кратных 3 и заканчивающихся на 2,4 или 8.

Решить в Паскале

+4

Ответы (1)

Знаете ответ?

Настюша · Answer 1

2)

Program Numbers;

Var

i: integer;

sum: integer;

Begin

sum : = 0;

i : = 21;

while i<=99 do

begin

if (i mod 10 = 2) or (i mod 10 = 4) or (i mod 10 = 8) then

sum : = sum + i;

i : = i + 3;

end;

WriteLn (sum) ;

ReadLn;

End.