Cоставте программу которая вычесляет произведение 10 произвольных целых двухзначных чисел (цикл с предусловием ,pascal)

Question

Информатика: Cоставте программу которая вычесляет произведение 10 произвольных целых двухзначных чисел (цикл с предусловием ,pascal)

Праемпт · Answer

Var x,y,z:longint;beginz:=10;y:=1while z 0beginz:=z-1;read(x);y:=x*y;end;write(y);end....