класс информатика
1. У исполнителя Удвоитель две команды:
1. прибавь 1
2. умножь на 2
Напишите программу из 4 команд, которая преобразует число 6 в число 29.
ответ:
2. У исполнителя Удвоитель две команды:
1. прибавь 1
2. умножь на 2
Напишите программу из 5 команд, которая преобразует число 2 в число 26.
ответ:
3. У исполнителя Удвоитель две команды:
1. прибавь 1
2. умножь на 2
Напишите программу из 5 команд, которая преобразует число 6 в число 51.
ответ:
4. У исполнителя Калькулятор две команды:
1. прибавь 2
2. умножь на 3
Напишите программу из 5 команд, которая преобразует число 5 в число 83.
ответ:
5. У исполнителя Калькулятор две команды:
1. вычти 2
2. умножь на 3
Напишите программу из 5 команд, которая преобразует число 8 в число 50.
ответ:
6. У исполнителя Калькулятор две команды:
1. вычти 3
2. умножь на 2
Напишите программу из 4 команд, которая преобразует число 8 в число 40.
ответ:
7. У исполнителя Удвоитель две команды:
1. прибавь 1
2. умножь на 2
Напишите программу из 4 команд, которая преобразует число 4 в число 36.
ответ:
Const
n=5;
Var
ma:array[1..n,1..n] of integer;
i,j:integer;
begin
writeln('Matrix reading...');
for i:=1 to n do
begin
writeln;
for j:=1 to n do
readln(ma[i,j]);
end;
writeln('First matrix:');
for i:=1 to n do
begin
writeln;
for j:=1 to n do
begin
write(ma[i,j]:4);
if (ma[i,j]<-8) or (ma[i,j]>6) then ma[i,j]:=sqr(ma[i,j]);
end;
end;
writeln;
writeln('Final matrix:');
for i:=1 to n do
begin
writeln;
for j:=1 to n do
write(ma[i,j]:4);
end;
end.
Пример ввода:
1
2
3
4
5
6
7
8
9
1
2
3
4
5
6
7
8
9
1
2
3
4
5
6
7
Пример вывода:
First matrix:
1 2 3 4 5
6 7 8 9 1
2 3 4 5 6
7 8 9 1 2
3 4 5 6 7
Final matrix:
1 2 3 4 5
6 49 64 81 1
2 3 4 5 6
49 64 81 1 2
3 4 5 6 49