Program random; var mo, my:shortint; begin mo:=-10; my:=22; while (mo+my=12) and (my<100) do begin writeln(mo,' + ',my,' = 12'); mo:=mo-1; my:=my+1; end; end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
