Регистрация
ismailismailov11
09.05.2023 20:25
Информатика
Есть ответ 👍

Решить в паскале найти произведение цифр четырёхзначного числа

243
422
Посмотреть ответы 2

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

Amelia2018
Amelia2018
4,5(73 оценок)
Var   p: longint;   k, m, n, i: integer; begin   write('введите целое четырехзначное число: ');   readln(n);   n : = abs(n); { вдруг отрицательное введут? }   p : = 1;   for i : = 1 to 4 do   begin       m : = n mod 10;       n : = n div 10;       p : = p * m   end;   writeln('произведение цифр в числе равно ', p); end. тестовое решение: введите целое четырехзначное число: 1234 произведение цифр в числе равно 24
nastiadair
nastiadair
4,6(43 оценок)
Если треугольник не равнобедренный, то берём стороны a,b (к примеру) и умножаем их друг на друга, потом делим число, которое получилось на 2. вот вам и площадь треугольника! та

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