Pascal abc.net двузначное число втрое больше суммы своих цифр, а квадрат этой суммы равен утроенному первоначальному числу. найдите это число.
223
233
Ответы на вопрос:
Var s,d,f,g,i: integer; begin for i: =10 to 99 do begin s: = i div 10; d: = i mod 10; f: = s+d; if (i*3 > f) and (sqr(f) = 3*s) then writeln(i); end; end.
Var s: string; begin readln(s); writeln('длина строки = ',length(s)); end. пример: one, two, three длина строки = 15
Популярно: Информатика
-
fkireeva16.09.2022 08:41
-
Александраlove129.01.2020 19:55
-
Noo198906.05.2023 08:30
-
annachanskp06yi327.05.2022 16:08
-
SoniaSonce17.06.2022 13:58
-
HowleenWolf200619.07.2021 00:23
-
selivanovartem114.06.2021 02:28
-
polinkaa77714.03.2020 07:34
-
настя758915.05.2022 23:16
-
марлен22318.04.2020 01:09