Задача 2. Запишите программный код вычисления значения функции

123

446

Посмотреть ответы 1

Ответы на вопрос:

йврлгквы

Информатика

4,7(44 оценок)

Program chet; var a,b,k,z: integer; begin a: =324; b: =141; k: =1; //т.к. как только a=b это +2 квадрата while a< > b do begin if a> b then begin a: =a-b; k: =k+1; writeln(b); end else begin z: =b; b: =a; a: =z; end; end; writeln('квадратов',k); end.p.s. он будет ввыводить в столбик стороны квадртов и по склько брали этот квадрат.