По информатике решите в паскале плз :33.Дано естественное трехзначное число. Найти

По информатике решите в паскале плз :3

3.Дано естественное трехзначное число. Определить и вывести на экран великую цифру этого числа.

Задать свой вопрос
Хансеваров Никита
1. Дано натуральное трехзначное число. Найти и вывести на экран великую цифру этого числа.
Екатерина Недор
5.Известен периметр квадрата p. Войдет ли круг с длиной окружности l в этот квадрат?
Регина Дзираева
1.Арбуз считается зрелым, если его плотность меньше, чем 0.85 г/см. Найти, является ли арбуз спелым, если известна его масса и длина большей окружности.
1 ответ
Var x,x1,x2,x3:integer; Begin Write('введите число'); Readln(x); X1:=x mod 10; X2:=x div 100; X3:=(x div 10) mod 10; If (x1gt;x2) and (x1gt;x3) then Write(x1); If (x2gt;x1) and (x2gt;x3) then Write(x2); If (x3gt;x2) and (x3gt;x1) then Write(x3); Readln End.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт