Сгенерируйте 3 случайных целых числа в диапазоне - вопрос №165762932040 от mcfrank203 04.06.2023 03:42

Question

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

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