program dzialania;
var a, b: integer;
begin
WriteLn('Program mnozacy a*b');
Write('Podaj liczbe a = ');
ReadLn(a);
Write('Podaj liczbe b = ');
ReadLn(b);
WriteLn(a, ' * ', b, ' = ', a * b);
ReadLn;
end.
Author: ZSE
Admnistrator serwisu. Nauczyciel przedmiotów informatycznych