Блог для маленьких школьников и их родителей
ШколаЛа

С клавиатуры вводится произвольное четырехзначное число найти произведение третьего и четвертого и сумму…

Автор:
Предмет: Информатика
Уровень: 5 - 9 класс

С клавиатуры вводится произвольное четырехзначное число найти произведение третьего и четвертого и сумму первого и второго

Pascal

Ответов к вопросу: 2
  • iana1233
    09.06.2024 | 23:27

    Ответ:
    begin
     var chislo:=ReadInteger(‘Введите число: ‘);
     Println(‘Произведение 3 и 4: ‘, (chislo mod 100 div 10)*(chislo mod 10));
     Println(‘Сумма 1 и 2: ‘, (chislo div 1000)+(chislo div 100 mod 10));
    end.

  • tolyavorobev
    09.06.2024 | 23:41

    Ответ:
    var a,b,c,d,s,n:integer;
    begin
    writeln(‘Введите 4-ехзначное число’);
    readln(n);
    a:= n div 1000;
    b:= n mod 100 div 10 ;
    c:= n mod 10 ;
    d:= n div 100 mod 10;
    s:=a*b*c*d;
    writeln(s);
    end.

Ответить на вопрос:
:p :-p 8) 8-) :lol: =( :( :-( :8 ;) ;-) :(( :o:
Нажимая на кнопку я даю согласие на обработку персональных данных и принимаю политику конфиденциальности.