Составить программу, которая определяет однозначные, - вопрос №1315282 от Fvfbgvbgbhhh 11.09.2021 08:21

Question

Информатика: Составить программу, которая определяет однозначные, двухзначные, трехзначные, четырехзначные или пятизначныеязык: abcpascal

Fvfbgvbgbhhh · Answer

var a,b:integer; {a-число, b-количество знаков числа}begin readln(a); while a 0 do  begin    b:=b+1;    a:=a div 10;  end;  writeln(b);end....