Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

Даны два натуральных числа – двузначное и трехзначное. Найти разность суммы цифр двузначного и трехзначного чисел.

Ответ оставил Гость

Program pr;
var a,b,s1,s2:integer;
begin
writeln(Введите двузначное число);
readln(a);
writeln(Введите трехзначное число);
readln(b);
s1:=a div10+a mod 10;
s2:=b div100+b mod10+(b div10)mod10;
writeln(Разность суммы цифр двузначного и трехзначного чисел равна  ,s1-s2);
end.