Improve input prompt for SumAverage program

This commit is contained in:
Timothy Warren 2021-09-17 10:32:01 -04:00
parent 19a5052d4d
commit bef5cd78c6
1 changed files with 5 additions and 5 deletions

View File

@ -8,19 +8,19 @@ var
mean : real;
begin
writeln('Enter the first number:');
write('Enter the first number:');
readln(num1);
writeln('Enter the second number:');
write('Enter the second number:');
readln(num2);
writeln('Enter the third number:');
write('Enter the third number:');
readln(num3);
writeln('Enter the fourth number:');
write('Enter the fourth number:');
readln(num4);
writeln('Enter the fifth number:');
write('Enter the fifth number:');
readln(num5);
sum := num1 + num2 + num3 + num4 + num5;