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.