Решите как можно быстрее во Запишите значение переменной s, полученное в результате работы следующей программы.
Var s,k: integer;
Begin
s := 1;
for k := 3 to 7 do
s := s * 2;
writeln(s);
End.
2 во Какое число будет напечатано после работы приведенной ниже программы, если при вводе переменная К получит значение 4?
Var K,n,F1,F2,P : Byte;
Begin
Readln(K);
F1 := 1; F2 := 1; n := 1;
Repeat n := n + 1;
P := F1 + F2;
F2 := F1;
F1 := P
Until n > K;
Writeln (‘P=’,P:3)
End.
3 во Запишите значение переменной s, полученное в результате работы следующей программы.
Var s,k: integer;
Begin
s := 1;
for k := 4 to 8 do
s := s + 7;
writeln(s);
End.
4 во Какое число будет напечатано после работы приведенной ниже программы, если при вводе переменная К получит значение 5?
Var K,n,F1,F2,P : Byte;
Begin
Readln(K);
F1 := 1; F2 := 1; n := 1;
Repeat n := n + 1;
P := F1 + F2;
F2 := F1;
F1 := P
Until n > K;
Writeln (‘P=’,P:3)
End.
5 во Какое число будет напечатано после работы приведенной ниже программы, если при вводе переменная К получит значение 4?
Var K,n,F1,F2,P : Byte;
Begin
Write (‘Задайте К =’);
Readln(K);
F1 := 1; F2 := 1; n := 2;
While n <= K do
Begin
P := F1 + F2; n := n + 1;
F2 := F1;
F1 := P End;
Writeln (‘P=’,P:3)
End.
166
366
Ответы на вопрос:
Из условия цикла видно, что i принимает значения от 1 до 26, значит при первом выполнении цикла i = 1.
Популярно: Информатика
-
dkdjdhhs13.06.2023 10:50
-
sterling108.06.2022 09:17
-
NoirShade11.02.2022 11:53
-
лилу11006.01.2023 15:38
-
alijonsamara20029.10.2020 08:31
-
софья2005415.08.2022 12:07
-
16oce127.02.2021 13:22
-
olegkarimov2031.03.2022 00:58
-
ХочуЗнатьВсе121.04.2020 04:41
-
dbrnjhbzybr03.06.2022 21:03