Предмет: Информатика,
автор: gfive9
ПАСКАЛЬ составьте программу определяющую разность цифр данного двузначного числа n
Ответы
Автор ответа:
1
var n,a,b:Integer;
begin
Read(n);
a:= n div 10;
b:= n mod 10;
WriteLn(a-b);
end.
begin
Read(n);
a:= n div 10;
b:= n mod 10;
WriteLn(a-b);
end.
Автор ответа:
1
//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var n:=abs(ReadInteger);
write(n mod 10-n div 10);
end.
//Версия 3.3, сборка 1634
begin
var n:=abs(ReadInteger);
write(n mod 10-n div 10);
end.
Интересные вопросы
Предмет: Математика,
автор: RedPanda228
Предмет: Английский язык,
автор: Аноним
Предмет: Математика,
автор: Magicfive666
Предмет: Алгебра,
автор: olesiauskova
Предмет: Литература,
автор: ммм141