ТутРешу.Ру

ПОМОГИТЕ ПОЖАЛУЙСТА! Вводим натуральное число…

Задание:

ПОМОГИТЕ ПОЖАЛУЙСТА! Вводим натуральное число N. Программа выписывает все натуральные числа, делящиеся на 3 без остатка, до N. Напишите пожалуйста программу (Паскаль) пожалуйста очень вас прошу

Решение:

Uses crt; var n,i: integer; beginreadln (n); for i: =1 to n doif (i mod 3=0) then writeln (i); end.




Знаете другой ответ?

Отправить свой ответ