Home
О нас
Products
Services
Регистрация
Войти
Поиск
alina28042002
@alina28042002
July 2022
1
13
Report
Решите задачу программированием линейных алгоритмов - Найти произведение цифр заданного четырехзначного числа.
ПППППППОООООООММММОООООГГГГИИИИТТТТЕЕЕЕЕ!!!!!!
Please enter comments
Please enter your name.
Please enter the correct email address.
Agree to
terms of service
You must agree before submitting.
Send
Answers & Comments
petyaGavrikov
Verified answer
Var a,a1,a2,a3,a4,p:integer;
begin
write('a = ');
readln(a);
a1:=a div 1000;
a2:=a div 100 mod 10;
a3:=a mod 100 div 10;
a4:=a mod 10;
p:=a1*a2*a3*a4;
writeln('p = ',p);
end.
Пример:
a = 2354
p = 120
2 votes
Thanks 3
×
Report "Решите задачу программированием линейных алгоритмов - Найти произведение цифр за..."
Your name
Email
Reason
-Select Reason-
Pornographic
Defamatory
Illegal/Unlawful
Spam
Other Terms Of Service Violation
File a copyright complaint
Description
Helpful Links
О нас
Политика конфиденциальности
Правила и условия
Copyright
Контакты
Helpful Social
Get monthly updates
Submit
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Verified answer
Var a,a1,a2,a3,a4,p:integer;begin
write('a = ');
readln(a);
a1:=a div 1000;
a2:=a div 100 mod 10;
a3:=a mod 100 div 10;
a4:=a mod 10;
p:=a1*a2*a3*a4;
writeln('p = ',p);
end.
Пример:
a = 2354
p = 120