: написать программу перемножения двух чисел! двух переменных
Var a,b,c: real; begin write('введите значение числа a: '); readln(a); write('введите значение числа b: '); readln(b); c:=a*b; write('произведение чисел' ,a,' и ', b ,' = ',c); end.