Блок схему program b3; var a, i, p: integer; begin writeln(a); read(a); p : = 3; for i : = 1 to 5 do begin p : = p * a; writeln(p); end; end.

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку