Сгенерируйте 3 случайных целых числа в диапазоне от - 20 до + 40 и выведите их на экран в одну строку

Question

Эмма Карпова

Информатика

7 января, 00:04

Сгенерируйте 3 случайных целых числа в диапазоне от - 20 до + 40 и выведите их на экран в одну строку

+5

Ответы (1)

Знаешь ответ на этот вопрос?

Виктория Сидорова · Answer 1

Program z1;

var a, b, c : integer;

begin

randomize;

a:=random (60) - 20;

b:=random (60) - 20;

c:=random (60) - 20;

write (a,' ', b,' ', c);

readln;

end.