x = float(input('Введите число x '))
y = float(input('Введите число y '))
proz = int(x) * int(y)
print('Произведение = ' + str(proz))
Var
i:integer;
s:string;
begin
readln(s);
for i:=1 to length(s) do
write(s[length(s)-i]);
end.
Знать команды для начала, "поднятия" пера, команду для того,чтобы "опустить" перо. и вписывать потом точки.