Нужна сделать лабораторную работу по технологиям
кто может - напишите , я скину полностью
121
182
Ответы на вопрос:
Var k,p,n: integer; begin readln(k); readln(p); n: =p div k * k; if (p mod k) < = (k-p mod k) then writeln(n) else writeln(n+k); end. пример: 4 15 16
Популярно: Информатика
-
newsergy8111.10.2021 19:08
-
kannaaa16.11.2022 16:39
-
Strangeeo17.08.2022 14:55
-
sot5804.10.2022 09:35
-
hassnallameozm4zm10.11.2020 11:12
-
Disna200619.05.2020 15:58
-
ksuha081202.03.2022 06:05
-
OlyaKasyanenko2814.11.2022 05:35
-
Rafaelnodat110.03.2021 07:16
-
FlexxZ00015.09.2020 02:48