ДАны числа а и b. Составить программу для вычесления среднего арифметического значения чисел

Question

Информатика

Аполлинарка

3 июня, 00:21

ДАны числа а и b. Составить программу для вычесления среднего арифметического значения чисел

+5

Ответы (2)

Знаете ответ?

Аввакум · Answer 1

Не написано на каком языке! Пишу паскаль

program 1;

var a, b, c:real;

begin

writeln ('a=') ;

readln (a) ;

writeln ('b=') ;

readln (b) ;

c = (a+b) / 2;

writeln ('Среднее арифметическое'c) ;

end.

Валерий · Answer 2

Пишу Visual Basic

Dim a, b as integer

private sub ...

a=textbox1. text

b=textbox2. text

Label1. text = (a+b) / 2

end sub ...

На форме

2 текстбокса, кнопка и 3 label программируем кнопкy

2 label возле текстбоксов в 1 а = во 2 b =