Иакинф
4 год назад
напишите программу для решения задачи. используйте операции div и mod. 1. задано двузначное число. найдите среднее арифметическое цифр числа.
ОТВЕТЫ
Ulyan
Oct 24, 2020
var a,b,c:integer;
s:real;
begin
write('Введите двузначное число: ');
readln(a);
b:= a div 10;
c:= a mod 10;
s:=(b+c)/2;
writeln('Среднее арифметическое цифр числа: ',s);
readln;
end.
s:real;
begin
write('Введите двузначное число: ');
readln(a);
b:= a div 10;
c:= a mod 10;
s:=(b+c)/2;
writeln('Среднее арифметическое цифр числа: ',s);
readln;
end.
190
Смежные вопросы: