Запишите на языке паскаль программу, которая для произвольного натурального двузначного числа определяет: а) сумму и произведение его цифр; б) число, образованное перестановкой цифр исходного числа.
106
128
Ответы на вопрос:
A) var a,sum,p: integer; begin writeln('введите число a'); read(a); sum: =a div 10 + a mod 10; p: =(a div 10) * (a mod 10); writeln('сумма цифр числа =',sum); writeln('произведение цифр числа =',p); end. б) var a: integer; begin writeln('введите число a'); read(a); a: =(a mod 10)*10+a div 10; writeln(a); end.
Популярно: Информатика
-
kateshopina070301.03.2023 05:30
-
Kate777939372729.09.2022 02:49
-
evgen22regiooon21.11.2021 05:16
-
DimaNewPARK10.06.2020 22:34
-
morozu02008.11.2022 21:07
-
katyatyan2003ozrqxb11.08.2020 23:29
-
irarmnv23.12.2022 21:02
-
teodormax21.06.2020 22:09
-
julija124527.07.2021 21:02
-
kabdollaevaalia05.11.2020 00:42