Составить программу которая вычислит сумму и произведение введенных чисел
сколько чисел вводится?
Если 2числа Var a, b:integer ; Begin Read(a, b) ; Write(a+b, ' ', a*b) ; End.