Question

С клавиатуры вводится целое число. Если оно двухзначное, то вывести удвоеную сумму на экран. Помоги пожалуйста. Спасибо

Answer 1

70 140 ну например а так то много способов

Answer 2

Var n:integer;
Begin
Readln(n) ;
If n dig 10>0 then writeln(n*2);
End.