Question

СРОЧНО, ПОМОГИТЕ ПОЖАЛУЙСТА!!!
Напишите программу на языке Паскаль:
Найти все числа в диапазоне от 1 до 100, которые делятся на 5, но не делятся на 10.

Answer 1

var i: integer;
begin
for i:=1 to 100 do
begin
if ((i mod 5)=0) and ((i mod 10)<>0) then
write(i,' ');
end;
end.

Answer 2

Огромное спасибо*