Question

2. алмас первый год изучает программирование. алмасу выбрать типы данных для выходных данных, если он пишет программу для следующих : 1) нахождения периметра треугольника со сторонами 3 см, 4 см, 5 см: 2) среднее арифметическое значение трех чисел. 3) при вводе величин программа определяет, больше ли введенное число 5 или нет. например: ввод x y=x> 5

Answer 1

1) 
Var a, b, c, p :real;
begin
a:=3;
b:=4;
c:=5;
p:=(a+b+c)/2;
writeLn('Периметр треугольника равен ', p);
end.
2) 
var a,b,c:real;
begin
writeln('Введите 3 числа');
readln(a,b,c);
write('Среднее арифметическое=',(a+b+c)/3:0:2);
end.