Срочно!! Пожалуйста
Ввести трёхзначное число и вывести трёхзначное или не трёхзначное ДАМ 30 баллов решать через Паскаль
2288489288589com:
Срочно!! Пожалуйста помогите
Ответы
Ответ дал:
0
Ответ:
var
x, y: integer;
a: string;
begin
write('Введите число: ');
readln(x);
str(x, a);
y := Length(a);
if y = 3 then
writeln('Это трёхзначное число!')
else
writeln('Это не трёхзначное число! ');
end.
Похожие вопросы
1 год назад
1 год назад
2 года назад
7 лет назад