Ответы на вопрос:
1) program n1; var a,b: real; begin readln(a,b); writeln('разность: ',a-b); writeln('произведение: ',a*b); writeln('сумма: ',a+b); writeln('частное: ',a/b); end. 2) program n2; var a,b,c: real; begin readln(a,b); c: =sqrt(a*a+b*b); writeln('площадь: ',0.5*a*b); writeln('периметр: ',a+b+c); end. 3) program n3; var d1,d2,d3,a: integer; begin write('введите число: '); readln(a); d1: = a div 100; d2: =a div 10 mod 10; d3: =a mod 10; writeln(d3,d2,d1); end.
Популярно: Информатика
-
Napol2818.08.2022 18:26
-
deneleslamov206.07.2022 15:37
-
arladich27.05.2020 11:10
-
aloaloaloalo06.12.2021 07:51
-
fewralskajaribozers306.02.2020 16:41
-
mishaniy25.11.2020 07:56
-
stasymitaki31.05.2020 21:04
-
GGWPmen05.01.2021 02:21
-
куколку28.02.2023 20:26
-
TTpopoK28.09.2022 05:33