Написать программу которая позволяет вводить а и в-целые числа и вывод на экран…

varbeginwriteln ('ввод переменных а и b'); readln (a,b); if a,b>=0 thenn: =a*bwriteln (n) elsewriteln ('не подходит к условию'); if a>b thenm: =a-bwriteln (m) elsewriteln ('a