
Вахарловский
5 год назад
(Pascal ABC)Дано двузначное число.Найти среднее арифметическое(при помощи div и mod)
ОТВЕТЫ

Гергана
Oct 24, 2020
var
a:integer;
begin
Readln(a);
Writeln((a div 10 + a mod 10)/2)
end.
42
3
a:integer;
begin
Readln(a);
Writeln((a div 10 + a mod 10)/2)
end.
42
3
642
Смежные вопросы: