Сұрақ қою

Жеке сұрақ қою

Сұрақ қою Сұрақ қою
Жеке сұрақ қою үшін сайтқа кіріңіз немесе тіркеліңіз .
program test;
var A:array[1..10]of integer;
i:integer;
 
begin
 
for i:=1 to 10 do
  A [i]:= random (50);
  writeln(A[i]);

for i:=1 to 10 do
  if A[i] > 0 then
    A[i]:=round(A[i]/2 )
  else
    A[i]:=i;
 
end.
tiger 16.04.2014 жазды
Baribar.kz
Сайт ережесі
Жоба туралы
© 2010-2025 "Baribar Media" ЖШС
...