Паскаль.

1. Вывести в столбик все двузначные числа. (1 цикл, 1 переменная)

2. Из тех же чисел вывести только те, что заканчиваются на 5.

3. Вывести в ряд 15 рандомных чисел от 10 до 30.

Question

Информатика

Рима

4 марта, 09:47

Паскаль.

1. Вывести в столбик все двузначные числа. (1 цикл, 1 переменная)

2. Из тех же чисел вывести только те, что заканчиваются на 5.

3. Вывести в ряд 15 рандомных чисел от 10 до 30.

+4

Ответы (1)

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

Маримьянка · Answer 1

1.

var i:integer;

begin

for i:=10 to 99 do writeln (i) ;

end.

Результат:

10

11

12

...

98

99

2.

var i:integer;

begin

for i:=10 to 99 do

if i mod 10=5 then writeln (i) ;

end.

Результат:

15

25

...

95

3.

var i:integer;

begin

for i:=1 to 15 do

write (random (21) + 10,' ') ;

end.

Пример:

25 19 12 11 25 27 30 19 21 19 15 10 14 22 22