Ниже записан алгоритм. укажите наименьшее из таких чисел x, при вводе которых алгоритм печатает сначала 2, а потом 11. var x, a, b: integer; begin readln(x); a : = 0; b : = 1; while x > 0 do begin a : = a+1; b : = b*(x mod 1000); x : = x div 1000; end; writeln(a); write(b); end.
186
416
Ответы на вопрос:
Вообщем непонятно что делает. убирает последние три цифры у числа, затем эти самые три цифры умножает на переменную "b", и так повторяется, пока это число не станет меньше 1000. ответ: 1011. не парься
Вот решение за o(n^3) var n,i,j,z: longint; begin read(n); for i: =1 to n do for j: =1 to n do for z: =1 to n do if (i*i+j*j=z*z) then writeln(i,' ',j,' ',z); end.
Популярно: Информатика
-
панда134104.06.2022 15:14
-
FaceLess11124.10.2022 22:35
-
gravasamp02.02.2021 14:46
-
ДевочКаНауКи01.07.2022 21:25
-
danya1311200428.12.2021 09:31
-
meimanby06.12.2021 13:29
-
гтто509.02.2022 17:25
-
valeriuadobro2018.07.2021 12:51
-
dianaabilovski02.08.2021 03:33
-
danbka270711.06.2023 13:08