Напишите программу, сумму и частное трёх чисел

vara,b,c:real;beginwriteln('Введите 3 числа: ');readln(a,b,c);writeln('a+b+c= ',a+b+c);writeln('a:b:c= ',a/b/c);end.