Статистика
Всего в нашей базе более 4 327 657 вопросов и 6 445 963 ответов!

Дано четырехзначное число. Определить: какая цифра больше: вторая или последняя.

5-9 класс

Сделать блок-схему и написать готовую программу.

PolinaVseznaika 22 марта 2017 г., 23:54:46 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
МАЛЯВОЧКА99
23 марта 2017 г., 1:58:07 (7 лет назад)

uses crt;
var a,b,c:integer;
begin
     readln(a);
     if (a>=1000) and (a<=9999) then
     begin
     b:=a mod 10;
     c:=a div 100 mod 10;
     if b>c then writeln('последняя')
        else if b<c  then writeln('вторая')
              else if b=c  then writeln('равны');
     end
     else writeln('error');
end.

+ 0 -
Aleogalaeva1
23 марта 2017 г., 4:11:23 (7 лет назад)

BEGIN
Ввести число N, проверить, что оно 4-значное.
read(N);
if (N >= 1000) and (N <= 9999) then
begin
    Найти 2 цифру
    A2 = Int(N / 100) Mod 10;
    Найти 4 цифру
    A4 = N Mod 10;
    Сравнить их
    if A2 > A4 then write "Вторая цифра больше, чем четвертая";
    if A2 < A4 then write "Вторая цифра меньше, чем четвертая";
    if A2 = A4 then write "Вторая цифра равна четвертой";
else
    write "Число должно быть 4-значным!";
end;
Конец
END.

Ответить

Читайте также

Напишите пожалуйста, 3 программы на Pascal'е: 1. Дано целое число. Если оно положительное, то прибавить к нему 1, если же нет, то найти остаток

от деления этого числа на 2.

2. Ввести двузначное число. Определить, какая цифра в числе больше.

3. Дано число. Является ли число 7 его делителем?

Дано трехзначное число. Определить, какая из его цифр

больше:
а) первая или последняя;
б) первая или вторая;
в) вторая или последняя.

РЕШИТЬ на Visual Studio



Вы находитесь на странице вопроса "Дано четырехзначное число. Определить: какая цифра больше: вторая или последняя.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.