Написать программу на паскале:

1) для вычисления среднего арифметической переменных х1 и х2

2) для уменьшения на единицу значения переменной k

Question

Кирюша

19 января, 08:50

+5

Ответы (1)

Знаете ответ на вопрос?

Апфия · Answer 1

1)

var x1, x2:integer;

begin

read (x1, x2) ;

writeln ((x1+x2) / 2) ;

end.

2)

var k:integer;

begin

read (k) ;

k:=k-1;

end.

Написать программу на паскале:1) для вычисления среднего арифметической переменных х1 и х22) для уменьшения на единицу значения переменной k