вывести на экран все числа из отрезка [1,50] которые делятся на 5

желательно представить в виде программмы, тобишь var...begin и т.д

program test;
var i:integer;
begin
   for i:=1 to 50 do
      if i mod 5 = 0 then
         write(i, );
   readln;
end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку