1.Найти самого высокого ученика класса (в классе 27 воспитанников). 2.Было куплено

1.Найти самого высочайшего ученика класса (в классе 27 учеников). 2.Было куплено 10 арбузов различного веса. Найти вес всей покупки. Решить в Паскале

Задать свой вопрос
1 ответ

1.program zz1;
const n = 27; //задаем количество частей в массиве
var i, max1, k:integer; // задаем переменные целого типа
m:array [1..n] of integer;
begin
for i:=1 to n do // записываем в массив числа случайным образом
m[i]:=random(51)+150;
for i:=1 to n do //выводим массив на экран
write(m[i], );
writeln; // переходим на новейшую строку для вывода ответа
max1:=0;
for i:=1 to n do // находим наибольший элемент и его номер
if m[i]gt;max1 then max1:=m[i];
writeln( самый высокий воспитанник в классе с ростом = ,max1, см); // выводим ответ
end.
2.program zz1;
const n = 10; // задаем количество частей в массиве
var i, s:integer; // задаем переменные целого типа
m:array [1..n] of integer;
begin
for i:=1 to n do // получаем n чисел случайных и записываем их в массив
m[i]:=random(1501);
for i:=1 to n do // выводим приобретенный массив на экран
write(m[i], );
writeln; // переходим на новейшую строчку для вывода ответа
for i:=1 to n do
s:=s + m[i]; // получаем сумму
writeln( вся покупка весит = ,s, грамм); // выводим ответ
end.

, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт