Question

Дано натуральное число n. Вывести на экран все натуральные числа от 1 до n, при делении которых на 5 получается остаток равный 3. (паскаль)
ПОМОГИТЕ ПОЖАЛУЙСТА, ЗАВТРА ПРАКТИКА!!!

Answer 1

Ответ:

program Hello;

var n,i:integer;

begin

 readln(n);

 for i:=1 to n do

   begin

       if i mod 5 = 3 then begin

           write(i,' ')

       end;

   end;

end.