Есть ответ 👍

Даны три числа. найти среднее арифметическое из наибольшего и наименьшего из этих чисел. pascal

213
317
Посмотреть ответы 2

Ответы на вопрос:

Myziki
4,6(58 оценок)

var max, min, a1, a2, a3: integer;

begin

write('введите три числа') ; read(a1, a2, a3) ;

if (a1> a2) and(a1> a3) then max: =a1;

if (a2> a1) and(a2> a3) then max: =a2;

if (a3> a1) and(a3> a2) then max: =a3;

if (a1

if (a2

if (a3

write('среднее арифмитическое максимального и наименьшее равна', (max+min)/2);

end.


первый ряд 4,                   6,               8,                 10

второй ряд            4²                6²              8²                10²

третий ряд                      7                  9                11                13

последовательность:

4,16,7,6,36,9,8,64,11,10,100,13 …  .

Популярно: Информатика