Запишите значение переменной s, полученное в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
Бейсик Python
DIM n, s AS INTEGER
s = 2
FOR n = 2 TO 5
s = s*2 + n
NEXT n
PRINT s s = 2
for n in range(2,6):
s = s*2 + n
print (s)
Паскаль Алгоритмический язык
var s,n: integer;
begin
s := 2;
for n := 2 to 5 do
s := s*2 + n;
writeln(s);
end. алг
нач
цел s, n
s := 2
нц для n от 2 до 5
s := s*2 + n
кц
вывод s
кон
С++
#include
using namespace std;
int main() {
int s = 2;
for (int n = 2; n <= 5; n++)
s = s*2 + n;
cout << s;
return 0;
}
1080
Объяснение:
Разберём 2 варианта.
1) когда буквы Р и Г постоянны, буква Н не используется, а остальные 3 буквы используются произвольно.
Получаем, что у буквы Р есть 5 вариантов постановки, у буквы Г - 4 варианта, и есть 3 места по 3 буквы.
Перемножаем: 5*4*3*3*3=540 вариантов.
2) когда буквы Р и Г постоянны, буква Н используется, а остальные 3 буквы используются произвольно.
Получаем, что у буквы Р есть 5 вариантов постановки, у буквы Г - 4 варианта, у буквы Н - 3 варианта и есть 2 места по 3 буквы.
Перемножаем: 5*4*3*3*3=540 вариантов.
Чтобы получить ответ, складываем оба варианта, получаем 540+540=1080 кодов
Объяснение:
program zadacha;
var d, o: text;
i, j, k, m, s: integer;
begin
assign(d, 'c:\data.txt');
reset(d);
assign(o, 'c:\output.txt');
rewrite(o);
i := 1;
j := 1;
readln(d, m);
s := m;
while not(eof(d)) do
begin
readln(d, k);
if k = m
then i := i + 1
else
begin
if i > j then
begin
s := m;
j := i
end;
m := k
end;
end;
writeln(o, 'Число: ', s, ', длина цепочки: ', i);
close(d);
close(o)
end.