напишите программу которая вычислит произведение и среднеарифметическое цифр двухзначного числа

Question

Тотя

6 октября, 00:01

+5

Ответы (1)

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

Витюля · Answer 1

Program dv;

var a1, a2, N: shortint;

begin

readln (N) ;

a1:=N div 10;

a2:=N mod 10;

writeln (a1*a2) ;

writeln (((a1+a2) / 2) : 4:4) ;

end.