составьте программу заполнения массива. Created by kan7607. informatika-ru

составьте программу заполнения массива...

Sandborn program mas;
var a:array[1..10] of integer;
i,p:integer;
begin
p:=1;
for i:=1 to 10 do
begin
a[i]:=p;
p:=p+2;
writeln (p);
end;
end.

0 votes Thanks 1

bоtsman Turbo Pascal
1)USES CRT;
VAR A:array[1..10] of integer;
i:integer;

BEGIN
CLRSCR;
For i:=1 to 10 do
  begin
A[i]:=i+i+1;
Write(A[i],' ');
  end;

READLN;
END.

2)
USES CRT;
VAR A:array[1..10] of integer;
  i:integer;

BEGIN
CLRSCR;
For i:=1 to 10 do
begin
  A[i]:=i+i+i;
  Write(A[i],' ');
end;

READLN;
END.

0 votes Thanks 0

Answers & Comments

sostavte programmu kotoraya zapolnyaet massiv a110 sluchajnymi celymi chislami6a51af775f16447f2bdf457ff0723e1c 14006

pomogite pridumat sochinenie na temuchto takoe svoboda ili hotya by natolknut n

nado li zapyataya posle odnako i esli da to pochemu odnako posle prochteniya my po

eto pryamoe ili perenosnoe znachenie slovaohotno prinyal by k sebe na sluzhbu

oboznachte koren v slovah podcherknite soglasnye kotorye chereduyutsya

nado li zapyataya posle ariny vlasevny i esli nado to pochemu evgenij bazarov vyr

vo skolko raz svetimost solnca bolshe belogo karlika sirius v esli ego svetim

sostavit programmu kotoraya menyaet dva vvedyonnyh slova mestami i pri neobhodim

kak uznat kakoj vysshij oksid u elementanaprimer u medi

h5 h4 2h32h2 3h30 kak eto reshit

рекомендуемые вопросы

Helpful Links

Helpful Social