Решить дано пятизначное число из интервала [10000, - вопрос №10000327671714590 от ммрк 18.10.2020 08:06

Question

Информатика: Решить дано пятизначное число из интервала [10000, 32767]. найти сумму первой, второй и пятой цифр этого числа.

ммрк · Answer

var n,s:integer; begin repeat write ( N = );readln(n); until (n =10000) and (n =32767); s:=n div 10000 + (n div 1000) mod 10 + n mod 10; writeln ( Summa: ,s); readln; end....