Оператор ввода в Pascal

Организуйте ввод чисел а и b с клавиатуры:
program summa;
var a, b, s: integer;
begin
writeln ('Введите число а');
writeln ('Введите число b');
s:=a+b;
writeln ('Сумма чисел а и b равна ', s)
end.

Правильный вариант:
program summa;
var a, b, s: integer;
begin
writeln ('Введите число а');
readln(a);
writeln ('Введите число b');
readln(b);
s:=a+b;
writeln('Сумма чисел а и b равна ',s)
end.

Напишите программу для вычисления цены на товар со скидкой. Цена на товар и скидка вводятся пользователем с клавиатуры произвольно.
Выполните проверку: