С клавиатуры вводится целое число. Если оно двухзначное, то вывести удвоеную сумму на экран. Помоги пожалуйста. Спасибо
Var n:integer; Begin Readln(n) ; If n dig 10>0 then writeln(n*2); End.
Добрый человек, СПАСИБО!
70 140 ну например а так то много способов
Мне нужно, как написать программу в ПАСКАЛЕ