Kyuomin
4 год назад
дано одно число. определить, двузначное ли оноВходные данные: во входном потоке в первой строке задано целое число А(0
ОТВЕТЫ
Benson Kevin
Oct 24, 2020
program pask;
var
a, count: integer;
begin
count:=0;read(a);
while a>0 dobegincount:=count+1;a:= a div 10;end;
if count = 2 then write('Это двузначное число')else write('Это не двузначное число');end.
var
a, count: integer;
begin
count:=0;read(a);
while a>0 dobegincount:=count+1;a:= a div 10;end;
if count = 2 then write('Это двузначное число')else write('Это не двузначное число');end.
804
Смежные вопросы: