Ответы
Ответ дал:
0
program cisla;
uses crt;
var m,n:longint;
k:integer;
begin;
clrscr;
writeln ('введите число=');
readln (n);
m:=n;
k:=0;
while m<>0 do begin
k:=k+1;
m:=m div 10;
end;
writeln ('в числе =',k,' цифр');
repeat until keypressed;
end.
uses crt;
var m,n:longint;
k:integer;
begin;
clrscr;
writeln ('введите число=');
readln (n);
m:=n;
k:=0;
while m<>0 do begin
k:=k+1;
m:=m div 10;
end;
writeln ('в числе =',k,' цифр');
repeat until keypressed;
end.
Ответ дал:
0
а откуда ты ?
Ответ дал:
0
Нашёл?
Ответ дал:
0
по моему я тебя нашла
Вас заинтересует
1 год назад
1 год назад
6 лет назад
8 лет назад
8 лет назад
9 лет назад
9 лет назад