Ниже на четырёх языках программирования записан алгоритм. Получив на вход число x, этот алгоритм печатает два числа: L и M. Укажите наибольшее число x, при вводе которого алгоритм печатает сначала 12, а потом 19.
| С++ | Python |
|---|---|
#include <iostream> using namespace std;
int main() { int x, K1, K2, Q, P, L, M; cin >> x; Q = 8; P = 10; K1 = 0; K2 = 0; while (x <= 100){ K1 = K1 + 1; x = x + P; } while (x >= Q){ K2 = K2 +1; x = x − Q; } L = x + K1; M = x + K2; cout << L << endl << M << endl; return 0; }
|
x = int(input()) Q = 8 P = 10 K1 = 0 K2 = 0 while x <= 100: K1 = K1 + 1 x = x + P while x >= Q: K2 = K2 + 1 x = x − Q L= x + K1 M = x + K2 print(L) print(M)
|
| Алгоритмический язык | Паскаль |
алг нач цел x, K1, K2, Q, P, L, M ввод x Q := 8 P := 10 K1 := 0 K2 := 0 мц пока x <= 100 K1 := K1 + 1 x := x + P кц кц пока x >= Q K2 := K2 + 1 x := x − Q кц L := x + K1 M := x + K2 вывод L, мс, M кон
| var x, K1, K2, Q, P, L, M: integer; begin readln(x); Q := 8; P := 10; K1 := 0; K2 := 0; while x <= 100 do begin K1 := K1 + 1; x := x + P; end; while x >= Q do begin K2 := K2 + 1; x := x − Q; end; L := x + K1; M := x + K2; writeln(L); writeln(M); end. |
Режим задачу с помощью языка PascalABC перебором. Ниже приведена программа для решения этой задачи.
var x, K1, K2, Q, P, L, M, i: integer;
begin
for i := 1000 downto 1 do begin
x := i;
Q := 8;
P := 10;
K1 := 0;
K2 := 0;
while x <= 100 do begin
K1 := K1 + 1;
x := x + P;
end;
while x >= Q do begin
K2 := K2 + 1;
x := x - Q;
end;
L := x + K1;
M := x + K2;
if (L = 12) and (M = 19) then begin
writeln(i);
break;
end;
end;
end.
В результате работы программы получаем ответ — 53.
Ответ: 53.
Приведём другое решение на языке Python.
for i in range(10000, 0, -1):
x = i
Q = 8
P = 10
K1 = 0
K2 = 0
while x <= 100:
K1 = K1 + 1
x = x + P
while x >= Q:
K2 = K2 + 1
x = x - Q
L = x + K1
M = x + K2
if L == 12 and M == 19:
print(i)
break