Регистрация
kM4X1Mk
24.04.2020 20:18
Информатика
Есть ответ 👍

Проболел тему , 1. найти произведение цифр трехзначного числа. исправьте программу, запишите правильный вариант. program 2pp; var a,b: integer; begin read (b); c: =a mod 10; b: =a mod 100; a: =a div 10; write (b,c,a); end. 2. определите, что вычисляет программа? programp2pp; var a,b: integer; begin read (a,b); a: =a div 10; b: =b div 10; if a> b then write (a) else write (b); end. 3. определите, что вычисляет программа? programp2pp; programp2pp; var a,b: integer; begin read (a,b); b: =a + b; a: =b- a; b: =b - a write (a,’ ‘, b); end. 4. составьте блок - схемы к 1, 2.

138
488
Посмотреть ответы 2

Ответы на вопрос:

Фокс890
Фокс890
4,7(45 оценок)

1.

program 2pp;

var a,b: integer;

begin

read (a);

c: =a mod 10; b: =a div 100;

a: =(a div 10) mod 10;

write (a*b*c);

end.

программа выводит какое из чисел a div 10 или b div 10 больше.

программа меняет местами значения a и b

guarginia666
guarginia666
4,4(54 оценок)
B: =38+9=47 a: =47-38=9 ответ: a=9             b=47

Популярно: Информатика