Нужна помощь по Pascal abc. Нужна программа, которая сравнит два введенных числа и напишет, какое больше.

Всё довольно просто, держи:

program WhatAreMoreHere; var a, b:integer; begin writeln () ; writeln (' Введите первое число: ') ; readln (a) ; writeln () ; writeln (' Введите второе число: ') ; readln (b) ; if (a=b) then writeln (' Число ', a, ' = ', b, '.') ; if (a>b) then writeln (' Число ', a, ' больше чем число ', b, '.') ; if (b>a) then writeln (' Число ', b, ' больше чем число ', a, '.') ; end.