7) В ячейку В1 записали формулу =F2+D2*E$1. Затем ячейку В1 скопировали во все ячейки
диапазона А1:06. Какое наибольшее числовое значение появится в ячейках этого
диапазона?
263
475
Ответы на вопрос:
Var n,m,d,k,max,maxk: integer; begin write('n = '); readln(n); write('m = '); readln(m); maxk: =0; for n: = m downto n do begin if n> 1 then k: =2 else k: =1; d: =n div 2; while d> 1 do begin if n mod d = 0 then k: =k+1; d: =d-1 end; if k> =maxk then begin maxk: =k; max: =n; end; end; writeln('искомое число: ',max); writeln('количество делителей этого числа: ',maxk); end.
Популярно: Информатика
-
Шишеа07.05.2022 20:56
-
dankillyou201407.08.2022 09:35
-
timabro1209.04.2021 17:18
-
дядяррррр18.05.2023 01:03
-
natata2308123.08.2020 01:43
-
masya0578113.10.2022 08:03
-
Агентство1020304027.08.2022 16:38
-
ulialepsha10.05.2021 05:09
-
varyavernerr10.09.2021 03:59
-
Sashka161108.11.2022 09:30