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

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

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

Question

Ростя

9 июня, 08:55

+1

Ответы (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