В интервале от 1 до 100 натуральных чисел вывести числа делящиеся на 5. Напишите в паскаль пожалуйста и если можно схему.
Ответы
Ответ дал:
0
var i:integer;
begin
for i:=1 to 100 do
if i mod 5=0 then write(i,';' );
end.
Ответ дал:
0
//PascalABC.NET 3.1 сборка 1219
begin
var a:=Range(1,100).Where(x->x mod 5 = 0);
PrintLn(a);
end.
begin
var a:=Range(1,100).Where(x->x mod 5 = 0);
PrintLn(a);
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
9 лет назад
10 лет назад