Регистрация
Войти
Стать экспертом Правила
Информатика

Паскаль.1. Вывести в столбик все двузначные числа. (1 цикл, 1 переменная)2. Из тех же чисел вывести только те, что заканчиваются на 5.3. Вывести в ряд 15 рандомных чисел от 10 до 30.

ОТВЕТЫ
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
18
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам