Информатика: В одномерном массиве найти 2 числа с наименьшей разницей

sfsv4641de2r

08.10.2020 19:04

Есть ответ 👍

В одномерном массиве найти 2 числа с наименьшей разницей

199

222

Посмотреть ответы 1

kk64

Информатика

4,8(91 оценок)

var

t, c : array [1..25] of real;

sumt, sumc : real;

i : integer;

begin

for i : = 1 to 25 do read (t[i]);

for i : = 1 to 25 do read (c[i]);

sumt : = 0; sumc : = 0;

for i : = 1 to 25 do

begin

sumt : = sumt + t[i];

sumc : = sumc + c[i];

end;

writeln ('средний вес = ', sumt / 25);

writeln ('средний рост = ', sumc / 25);

end.

const

maxn = 1000;

var

a : array [1..maxn] of integer;

n, i : integer;

begin

read (n); //если n дано

//если n не дано, нужно читать до конца строки

//while not eoln do begin n : = n + 1; read (a[n])} end;

for i : = 1 to n do read (a[i]); //если n дано

for i : = n downto 1 do

if i mod 2 = 1 then write (a[i], ' ');

end.

тесты: а) 8 5 1 б) 9 8 4 6 1

Задай свой вопрос

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.