Задать вопрос
ИнформатикаИнформатика
30 декабря, 06:16

Здравствуйте, помогите написать програмку в паскале.

-Ввести два трехзначных числа. Если последняя цифра первого числа равна первой цифре второго числа, то утроить каждое число, иначе - найти частное чисел.

+2
Ответы (1)
  1. 30 декабря, 09:58
    0
    Var numb1, numb2:integer;

    begin

    readln (numb1, numb2) ;

    if (numb1 mod 10 = numb2 div 100) then

    writeln (numb1*3,' ', numb2*3)

    else

    writeln (numb1/numb2) ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Здравствуйте, помогите написать програмку в паскале. -Ввести два трехзначных числа. Если последняя цифра первого числа равна первой цифре ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Главная » Информатика » Здравствуйте, помогите написать програмку в паскале. -Ввести два трехзначных числа. Если последняя цифра первого числа равна первой цифре второго числа, то утроить каждое число, иначе - найти частное чисел.
Регистрация Забыл пароль