Question

Решить алгоритм. Задумайте два целых числа, вычислите произведение чисел. Сравните « найденное произведение равно 100» Если ДА-сообщить равно и сделать команду 5, если НЕТ-сделать команду 5. Закончить выполнение алгоритма

Answer 1

Program p1;
uses crt;
var a,b,p:integer;
begin
read(a,b);
p:=a*b;
If P= 100 then
write('Да, равно 5')
else write('Нет, неравно 5');
end.

Answer 2

Хорошо, давайте решим этот алгоритм:

1. Задумайте два целых числа.
2. Вычислите их произведение.
3. Сравните найденное произведение с числом 100.
4. Если произведение равно 100, выполните команду 5.
5. Если произведение не равно 100, выполните команду 5.
6. Закончите выполнение алгоритма.

Пример выполнения алгоритма:

Допустим, мы задумали числа 10 и 10. Произведение этих чисел равно 10 * 10 = 100.

Так как найденное произведение (100) равно 100 (целевому числу), мы выполняем команду 5 (какая это команда - не указано в задании).

Алгоритм выполнен, и процесс завершается.