Проверить, является ли число трехзначным, у которого 1-ая цифра одинакова заключительней.(В

Проверить, является ли число трехзначным, у которого первая цифра одинакова заключительной.(В паскале)

Задать свой вопрос
Максим Еидашов
http://ru.static.z-dn.net/files/de4/b88eb2ad5973e441839e93b057785bad.txt
2 ответа
Var n:string;k,i:integer;beginreadln(n);k:=length(n);if k=3 then writeln('yes') else writeln('no');end.
Аделя Соколец
всё верно. спасибо
var   i,cnt:integer; begin   cnt:=0;   for i:=100 to 999 do   begin     if ((i div 100)=(i mod 10)) then inc(cnt);   end;   writeln(cnt);   readln; end.
Накаткин Диман
чё то у тебя не то. не верно. цифру 90 выводит в начале и ничего не определяет
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт