Если не сложно, напишете пожалуйста программу на паскале, которая бы вычисляла разность первой и последней цифры в трехзначном числе
Answers & Comments
DRЕDD
Program abc; var a,b,ci: integer; begin writeln('Введите трехзначное число'); read(a); b:=a mod 10; a:= a div 10; a:= a div 10; if a>=b then c:=a-b else c:=b-a; writeln(c); end.
Answers & Comments
var a,b,ci: integer;
begin
writeln('Введите трехзначное число');
read(a);
b:=a mod 10;
a:= a div 10;
a:= a div 10;
if a>=b then c:=a-b else c:=b-a;
writeln(c);
end.