Какое число выведет данная программа? const mas : array[1..5] of integer=(1, 2, 3, 4, 5); var mas2: array[1..5] of integer; begin mas2[1] := (mas[5] + mas[1]) mas[3]; write(mas2[1]); end.
2) const N=8; M=10; var p:array[1..N,1..M] of integer; i,j:integer; begin for i:= 1 to N do for j:=1 to M do begin p[i,j]:=i*j; write(p[i,j],' ') end; end.
3) const N=4; M=6; var z:array[1..N,1..M] of integer; i,j,sum,pr:integer; begin randomize;sum:=0; pr:=1; for i:= 1 to N do for j:=1 to M do begin z[i,j]:=random(100); write(z[i,j],' '); sum:=sum+z[i,j]; pr:=pr*z[i,j]; end; writeln(); write('сумма ',sum,' произведение ',pr); end.
4) const N=5; M=5; var a:array[1..N,1..M] of integer; i,j,sum,pr:integer; begin randomize; sum:=0; pr:=1; for i:= 1 to N do for j:=1 to M do begin a[i,j]:=random(100); write(a[i,j],' '); sum:=sum+a[i,j]; pr:=pr*a[i,j]; end; writeln(); write('сумма ',sum,' произведение ',pr); end.
Сейчас на очень трудно представить мир без интернета. Каждый из нас, каждый день тратит время на компьютер, телефон или планшет. Как выглядил бы современный мир без интернета?
Если у нас пропал бы интернет, то дети пошли бы играть на улицу, придя после школы ты сел бы за уроки, а не в компьютер, ты стал бы лучше учится тк тебя не отвлекали сообщения от друзей и знакомых. В ближайшее время ты пошел бы в библиотеку тк тебе нужно было бы написать дополнительную информацию по домашнему заданию. У людей стало бы больше времени и они стали ухудшать свое зрении намного медленнее.
Без интернета жизнь стала бы лучше? Сомневаюсь. Тк ты много времени тратил на поиск информации, было бы не удобно общаться через большие расстояния, ты больше не смог бы позвонить своим родственникам по видео связи, которые живут далеко.
const
N=8;
M=10;
var p:array[1..N,1..M] of integer;
i,j:integer;
begin
for i:= 1 to N do
for j:=1 to M do
begin p[i,j]:=i*j; write(p[i,j],' ')
end;
end.
3)
const
N=4;
M=6;
var z:array[1..N,1..M] of integer;
i,j,sum,pr:integer;
begin
randomize;sum:=0;
pr:=1;
for i:= 1 to N do
for j:=1 to M do
begin z[i,j]:=random(100);
write(z[i,j],' ');
sum:=sum+z[i,j];
pr:=pr*z[i,j];
end;
writeln();
write('сумма ',sum,' произведение ',pr);
end.
4)
const
N=5;
M=5;
var a:array[1..N,1..M] of integer;
i,j,sum,pr:integer;
begin
randomize;
sum:=0;
pr:=1;
for i:= 1 to N do
for j:=1 to M do
begin
a[i,j]:=random(100);
write(a[i,j],' ');
sum:=sum+a[i,j];
pr:=pr*a[i,j];
end;
writeln();
write('сумма ',sum,' произведение ',pr);
end.
Сейчас на очень трудно представить мир без интернета. Каждый из нас, каждый день тратит время на компьютер, телефон или планшет. Как выглядил бы современный мир без интернета?
Если у нас пропал бы интернет, то дети пошли бы играть на улицу, придя после школы ты сел бы за уроки, а не в компьютер, ты стал бы лучше учится тк тебя не отвлекали сообщения от друзей и знакомых. В ближайшее время ты пошел бы в библиотеку тк тебе нужно было бы написать дополнительную информацию по домашнему заданию. У людей стало бы больше времени и они стали ухудшать свое зрении намного медленнее.
Без интернета жизнь стала бы лучше? Сомневаюсь. Тк ты много времени тратил на поиск информации, было бы не удобно общаться через большие расстояния, ты больше не смог бы позвонить своим родственникам по видео связи, которые живут далеко.