Составьте программы в packal abc для следующих : 1)с клавиатуры вводится три вещественных числа. найти целую часть от суммы этих вещественных чисел. 2)с клавиатуры вводится целое число. найди дробную часть от деления целого числа на n 3)с клавиатуры вводится четыре вещественных числа. найти сумму этих вещественных чисел и округлить ее.
118
431
Ответы на вопрос:
1) program n1; var a,b,c: real; sum: integer; begin readln(a,b,c); sum: =trunc(a+b+c); writeln(sum); end. 2) program n2; var a,n: integer; x: real; begin readln(a,n); x: =frac(a/n); writeln(x) end. 3) program n3; var a,b,c,d: real; sum: integer; begin readln(a,b,c,d); sum: =round(a+b+c+d); writeln(sum); end.
Популярно: Информатика
-
списыватель14704.08.2020 12:24
-
1234567Саша23.06.2020 03:29
-
klychkovs6626.11.2021 14:42
-
gallyamovdenis30.08.2022 08:25
-
тоты201721.01.2021 17:20
-
iragafieva26.08.2020 23:38
-
Rj702.05.2022 20:09
-
11Sone44ka1109.06.2023 15:12
-
Снежана201808.01.2020 02:52
-
aldeerGroMo28.01.2023 23:47