В массиве хранится информация о росте 35 человек (в см.),проживающихв санатории
В массиве хранится информация о росте 35 человек (в см.),проживающихв санатории "Буг"
1.Опишите данный массив
2.Заполните массив случайными целыми числами из отрезка[130; 190]
3.Выведите элементы массива в строчку через пробел.
4.Подсчитайте кол-во человек, рост которых не ниже 160 см.
5.Выведите номера тех людей, рост которых кратен 3
6.Определите рост самого высочайшего человека.
7.Найдите средний рост почивающих
var
a:array[1..35] of integer;
b,c,d:integer;
i:real;
Begin
for b:=1 to 35 do
a[b]:=random(49)+132;
for b:=1 to 35 do
write(a[b],' ');
writeln;
for b:=1 to 35 do
if a[b]gt;159 then c:=c+1;
for b:=1 to 35 do
if a[b] mod 3=0 then write(b,' ');
writeln;
for b:=1 to 35 do
if a[b]gt;d then d:=a[b];
writeln(d);
for b:=1 to 35 do
i:=i+a[b];
i:=i/35;
writeln('Средний рост: ',i:0:3);
end.
-
Вопросы ответы
Статьи
Информатика
Статьи
Математика.
Разные вопросы.
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.