Сгенерируйте 3 случайных целых числа в диапазоне - вопрос №165672732040 от BloodyMary001 06.08.2022 02:15

Question

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

BloodyMary001 · Answer

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;...