Написать программу, используя цикл for.
1. Найдите количество трехзначных чисел, кратных 3 и оканчивающихся на 4.
2. Вычислить сумму .
3. Найти четырехзначное число, равное квадрату числа, выраженного двумя последними цифрами этого четырехзначного числа.
1. Найдите количество трехзначных чисел, кратных 3 и оканчивающихся на 4.
2. Вычислить сумму .
3. Найти четырехзначное число, равное квадрату числа, выраженного двумя последними цифрами этого четырехзначного числа.
Answers & Comments
var i,k,n: byte;
begin
writeln('Трехзначные цифры, кратные 3 и оканчивающиеся на 4');
for i:=100 to 999 do
begin
if (i mod 3=0) and (i mod 10=4)
then write(i,' ');
end;
readln;
end.
3) Число 5776