Регистрация
karinapoltawska
21.05.2020 18:30
Информатика
Есть ответ 👍

Составить программу которая напечатает 10 случайных чисел, в диапазоне от 1 до 100. паскаль авс

120
203
Посмотреть ответы 2

Ответы на вопрос:

влюбленыйотличник
влюбленыйотличник
4,7(52 оценок)
Var i: integer; begin randomize; for i: =1 to 10 do writeln(random(100)+1); end.
Красотка12092002
Красотка12092002
4,8(54 оценок)
Program abc; var a,b,ci: integer; begin writeln('введите трехзначное число'); read(a); b: =a mod 10; a: = a div 10; a: = a div 10; if a> =b then c: =a-b else c: =b-a; writeln(c); end.

Популярно: Информатика