Задача: ввести два числа a,b,c Найти сумму чисел и результат ввести на экран

Var a,b,c,r:integer;begin writeln (' vvedite 3 chusla ');read(a,b,c);r:=a+b+c;write (r);end.