ПОМОГИТЕ ПОЖАЛУЙСТА. СРОЧНО
Var s, k: integer; begin
s:=50; for k:=1 to 7 do
s:=s-k; writeln(s) end.

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.

© 2026 Все права защищены Политика конфиденциальности Контакты