Задан числовой массив, состоящий из 15 элементов. Подсчитать и вывести на экран количество элементов в массиве, которые меньше его первого элемента.
Ответы
Ответ дал:
0
const n= 15;
var
a:array[1..n] of integer;
i,c:integer;
begin
for i:=1 to n do
begin
read(a[i]);
if a[i]<a[1] then
c:=c+1;
end;
writeln(c);
end.
var
a:array[1..n] of integer;
i,c:integer;
begin
for i:=1 to n do
begin
read(a[i]);
if a[i]<a[1] then
c:=c+1;
end;
writeln(c);
end.
Ответ дал:
0
По условию работаем с массивом
Ответ дал:
0
С массивом, так с массивом
Ответ дал:
0
Вот, другое дело
Ответ дал:
0
const n = 15;
var a:array[1..n] of integer;
i,k:integer;
begin
for i:=1 to n do begin
a[i]:=random(101)-50;write(a[i]:4);
end;
writeln;
for i:=2 to n do if a[i]<a[1] then k:=k+1;
writeln('Меньше чем ',a[1],' получилось: ', k);
end.
Тестовое решение
12 13 19 -14 -23 -12 -11 37 -48 -45 30 -12 47 17 50
Меньше чем 12 получилось: 7
var a:array[1..n] of integer;
i,k:integer;
begin
for i:=1 to n do begin
a[i]:=random(101)-50;write(a[i]:4);
end;
writeln;
for i:=2 to n do if a[i]<a[1] then k:=k+1;
writeln('Меньше чем ',a[1],' получилось: ', k);
end.
Тестовое решение
12 13 19 -14 -23 -12 -11 37 -48 -45 30 -12 47 17 50
Меньше чем 12 получилось: 7
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад
8 лет назад
9 лет назад
9 лет назад