Ответы
Ответ дал:
0
Ответ:
Объяснение:
var
a:array [1..7] of integer;
i:integer;
begin
for i:=1 to 7 do
begin
a[i]:=random(61);
write(a[i],' ');
a[i]:=a[i]-10;
end;
for i:=1 to 7 do
write(a[i],' ');
end.
2)
const
n=15;
var
a: array [1..n] of real;
i:integer;
begin
for i:=1 to n do
readln(a[i]);
for i:=1 to n do
begin
a[i]:=a[i]*4;
write(a[i],' ');
end;
end.
kovalevaemily:
Язык паскаль!!!
Вас заинтересует
3 месяца назад
3 месяца назад
4 месяца назад
4 месяца назад
1 год назад
7 лет назад