Написать программу в Pascal по 2 способам for и while.

Задание: Вывести на экран числа оканчивающаяся на 3 в промежутке от n до 150

Question

Информатика

Мунасиб

22 июля, 21:15

Написать программу в Pascal по 2 способам for и while.

Задание: Вывести на экран числа оканчивающаяся на 3 в промежутке от n до 150

+2

Ответы (1)

Знаете ответ на вопрос?

Виджэй · Answer 1

While:

var

n: integer;

begin

write ('Введите начало диапазона (n) : ') ;

readln (n) ;

while n < 150 do

begin

if n mod 10 = 3

then write (n, ' ') ;

n : = n + 1; end;

end.

for:

var

n, i: integer;

begin

write ('Введите начало диапазона (n) : ') ;

readln (n) ;

for i : = n to 150 do

if n mod 10 = 3

then write (i, ' ') ;

end.

Написать программу в Pascal по 2 способам for и while.Задание: Вывести на экран числа оканчивающаяся на 3 в промежутке от n до 150

Написать программу в Pascal по 2 способам for и while.

Задание: Вывести на экран числа оканчивающаяся на 3 в промежутке от n до 150