Предмет: Информатика, автор: Аноним

Напишите программу, которая определяет, верно ли, что введённое число -трёхзначное. Пожалуйста напишите программу в Паскале. Начало с var...begin...end.Пожалуйста

Ответы

Автор ответа: XIZOR
0
var a:integer;b:string;beginreadln(a);str(a,b);if length(b)=3 then writeln(b,' - трехзначное число');end.
Автор ответа: XIZOR
0
var a:integer;
b:string;
begin
readln(a);
str(a,b);
if length(b)=3 then writeln(b,' - трехзначное число');
end.
Интересные вопросы
Предмет: Математика, автор: ezevezik100
Предмет: Русский язык, автор: ilyfbrawl
Выпишите предложение с п/о.
Выпишите предложение с д\о.
Выпишите предложение с приложением.
Определите тему и основную мысль текста.

В этом году Компания Translogistics поздравила юбиляров, участвовавших в
завоевании победы. Одним из первых был поздравлен Огарков Федор Тимофеевич, ветеран Великой Отечественной войны. Ветеран войны поделился историями из прошлого, был рад оказанному вниманию, хотя в преддверии праздников, дня рождения и Дня Победы, Федор Тимофеевич один не бывает.
В отличном настроении и здоровье приняла поздравления Молчанова Татьяна Никифоровна, медсестра, вынесшая с поля боя немалое количество раненых бойцов.
Рассказывая о заслуженных наградах, грамотах, о своей молодости, она едва сдерживала слезы. Ветераны встречали гостей радушно и были рады принять подарок - сертификат на приобретение лекарственных средств в аптеке от Компании Translogistics. Но не обошлось без исключения. Ефимов Алексей Петрович, которому в этом году исполнилось 85 лет, был рад принять только поздравления и цветы. От сертификата на лекарства он отказался, объясняя тем, что за всю жизнь он не принимал таблеток. И в сложные времена своей молодости и сейчас придерживается такого правила, что лекарства не приносят пользы. Попросил вручить подарок тому, кому он будет полезен. От всей души Компания Translogistics поздравляет всех с Днем Победы и желает, чтобы каждый из нас в 85 лет мог повторить слова Ефимова Алексея Петровича.

Срочно 100 баллов