Дано целое положительное четырехзначное число. Напишите программу, позволяющую…

Question

86

Дано целое положительное четырехзначное число. Напишите программу, позволяющую определить сумму двух первых цифр и разность двух последнихцифр

в избранное ссылка

Знаете ответ?

visar · Accepted Answer

37

visar

27 марта 2023

Program fatzz051; var a: integer; beginreadln (a); writeln ('Sum=',a div 1000+a div 100 mod 10); writeln ('Razn=',a div 10 mod 10-a mod 10); end.

комментировать

в избранное ссылка отблагодарить