Пожалуйстаа решите мне

Знания

Информатика

2 ответа:

Alibek007 [496]4 года назад

0 0

Получается АДЖЛДЛАЛ.

Солнца луч [1.2K]4 года назад

0 0

ответ будет такой аджлдлал

Читайте также

Составьте программу, которая формирует массив из 20 случайных чисел от -10 до 10выводит на экрын элементы с нулевыми значениями

оксана гуляй

Const Sz = 100; // Размер массива

var
a: array [1..Sz] of integer;
N: integer; // Количество элементов в массиве
i: integer;

begin
N := 20;
for i:=1 to N do
a[i] := Random(20)-10;
writeln('Элементы массива: ');
for i:=1 to N do
write (a[i],' ');
writeln;
for i:=1 to N do
begin
if (a[i]=0) then
writeln(a[i],' ',i);
end;
end.

0 0

4 года назад

Помогите с информатикой плиз))

Emmik

Paskall:
var a:array[1..5[ of integer;
i, min:integer;
begin
writeln('Введите элементы массива (5 целых чисел) в одной строке и нажмите <Enter>');
for i:=1 to 5 do
read(a[i]);
min:=a[1];
for i:=2 to 5 do
if(a[i]<min) then
min:=a[i];
writeln('Минимальный элемент массива: ', min);
end.

0 0

3 года назад

В этом задании нужно отметить верные утверждения. 1.Конструкция ЕСЛИ ... ТО ... ИНАЧЕ ... называется циклом.Да Нет 2.Служебное

Андрей Че2

1.нет
2.да
3.да
4.да
5.да

0 0

5 лет назад

Определите, что будет напечатано в результате работы следующей программы. var s, n: integer; begin s:= 1; for n:= 5 to 8 do s:=

Артем Гаркуша [342]

1) 81
2) 43
3) 24
4) 31

0 0

4 года назад