Напишите программу для решение с клавиатуры вводится - вопрос №9471822199 от toktamuratovanilufar 17.05.2023 11:42

Question

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

toktamuratovanilufar · Answer

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