Программа на паскале! найти количество пар двузначных чисел сумма которых не превысит 100
211
245
Ответы на вопрос:
Var a, b, k: integer; begin k : = 0; for a: = 10 to 99 do for b: = 10 to 99 do if (a+b < = 100) then k : = k+1; writeln('k = ',k) end.
Популярно: Информатика
-
vkunney14.05.2021 08:57
-
Польха14.02.2021 11:17
-
nemkovvlad110.04.2021 13:25
-
Nemogu99923.10.2020 17:43
-
тупая76120.04.2021 14:56
-
тупикл1229.03.2021 12:23
-
asvpdsh03.05.2020 12:48
-
Ta4er1112.05.2020 02:58
-
MariyaPak270109.10.2021 13:43
-
heartanime31.01.2023 09:50