Помогите сосьавить программу назождения среднего арефметического двух чисел

0 голосов
89 просмотров

Помогите сосьавить программу назождения среднего арефметического двух чисел


Информатика (44 баллов) | 89 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Var
 a,b:integer;
 r:real;
begin
 readln(a);
 readln(b);
 r:=(a+b)/2;
writeln(r);
end.

(38.6k баллов)
0

спасибо большое