Задать вопрос
8 июля, 17:07

Дано число (A), если оно однозначное, То умножить его на 3, если трехзначное разделить на 3

+1
Ответы (1)
  1. 8 июля, 18:00
    0
    Var

    a: integer;

    b: double;

    begin

    readln (a) ;

    b : = a;

    if (a mod 10 = a) then

    b : = a * 3;

    if (a div 100 0) and (a div 1000 = 0) then

    b : = a / 3;

    writeln (b) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Дано число (A), если оно однозначное, То умножить его на 3, если трехзначное разделить на 3 ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы