program SumOfCubes; var a, b, c, sum: integer; begin write('Enter the first number: '); readln(a); write('Enter the second number: '); readln(b); write('Enter the third number: '); readln(c);
sum := a a a + b b b + c c c;
writeln('The sum of cubes of ', a, ', ', b, ' and ', c, ' is: ', sum); end.
program SumOfCubes;
var
a, b, c, sum: integer;
begin
write('Enter the first number: ');
readln(a);
write('Enter the second number: ');
readln(b);
write('Enter the third number: ');
readln(c);
sum := a a a + b b b + c c c;
writeln('The sum of cubes of ', a, ', ', b, ' and ', c, ' is: ', sum);
end.