Напишите программу для решение с клавиатуры вводится - вопрос №94709201 от dariasit 03.09.2022 05:40

Question

Информатика: Напишите программу для решение с клавиатуры вводится целое число от 1 до 99 если число2-значное ,то вывести кол-во десятков в числе,иначе вывести введенное число увеличенное на 1 с dif и mod paskal

dariasit · Answer

Var a:integer;Beginread(a);If a 10 then a:= a div 10else a:= a+1; writeln(a);end....