Написать программу на языке Pascal. Написать программу, которая выводит 10 одинаковых чисел
антагонист:
10 любых одинаковых чисел?
Ответы
Ответ дал:
1
var a,b,c,d:integer;
begin
b:=0;
randomize;
a:= random(1000);
while b<>10 do
begin
writeln (a);
b:=b+1;
end;
end.
begin
b:=0;
randomize;
a:= random(1000);
while b<>10 do
begin
writeln (a);
b:=b+1;
end;
end.
хэй, а лучший ответ :D
Похожие вопросы
1 год назад
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад