Помогите, пожалуйста, с информатикой, срочно!!!

1. var n, s: integer;

begin

n := 0;

s := 0;

while s <= 365 do

begin

s := s + 36;

n := n + 7

end;

write(n)

end.
Please enter comments
Please enter your name.
Please enter the correct email address.
You must agree before submitting.

Answers & Comments


Copyright © 2024 SCHOLAR.TIPS - All rights reserved.