Предмет: Информатика,
автор: popovavikulya
СРОЧНО, ПОМОГИТЕ ПОЖАЛУЙСТА!!!
Напишите программу на языке Паскаль:
Найти все числа в диапазоне от 1 до 100, которые делятся на 5, но не делятся на 10.
Ответы
Автор ответа:
0
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.
begin
for i:=1 to 100 do
begin
if ((i mod 5)=0) and ((i mod 10)<>0) then
write(i,' ');
end;
end.
Автор ответа:
0
Огромное спасибо*
Интересные вопросы
Предмет: Алгебра,
автор: Аноним
Предмет: География,
автор: zarzeckaula107
Предмет: Українська мова,
автор: alasliu
Предмет: Геометрия,
автор: olj4ik
Предмет: Математика,
автор: dashavladykina1