??? ???prostite smojete vi mne pomoch napisat programu s pomashu RANDOM , chto bi kampjuter dala mne 4 raznix chisel 0....9,
sposibo za pomoshch!!!!!!!!!! :D :D :D
Полная версия: Вместе с random
Если мне MJ правильно перевел, то тебе поможет вот этот код :
Код
x:=0;
rаndomize;
for x := 1 to 4 do WriteLn(Random(10));
rаndomize;
for x := 1 to 4 do WriteLn(Random(10));
Код
program R;
var
X: Byte;
begin
radomize;
for x := 1 to 4 do
WriteLn(Random(10));
end.
var
X: Byte;
begin
radomize;
for x := 1 to 4 do
WriteLn(Random(10));
end.
Проще задания я не встречал :
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.