Дано целое число N (> 1). Вывести наименьшее целое K, при котором выполняется неравенство 3K < N, и само значение 3K
Program z1;
Var k:integer;
Begin
Readln(k);
Writeln(1);
End.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
