Пример простейшего ввода и вывода данных

Задача

Получить от пользователя данные, обработать их и вывести на экран.

Решение

var
    a,b,c,d,sum: integer;
    mult: longint;
begin
    write('Input number a: ');
    readln(a);
    write('Input number b: ');
    readln(b);
    sum:= a+b;
    writeln('Sum of the numbers ',a,' and ',b,' is ',sum);
 
    writeln;
 
    writeln('Input below numbers c and d: ');
    read(c,d);
    mult:= c*d;
    writeln('The result of multiplying ',c,' and ',d,' is ',mult);
end.

Тема

Линейные алгоритмы

Уровень

Простые задачи