Ответы на вопрос:
1. Ошибка после begin: c не может быть дробным числом по условию.
2.
А - 2
Б - 4
В - 1
Г - 3
3.
var k, a, x:Integer;
begin
k:=0;
a:=1;
readln(x);
while a < x do
begin
k:=k+3;
a:=a*2;
end;
writeln(k);
end.
Популярно: Информатика
-
Usoll04.06.2020 09:06
-
Meowmeowmi31.03.2023 14:30
-
Sinderella200609.05.2022 09:57
-
Igor17171729.04.2023 22:55
-
TheAgentSquid01.10.2022 20:03
-
Mrkronomax02.06.2021 09:23
-
Privet20610.08.2020 15:07
-
sladkaiakailinn16.09.2022 14:40
-
Sem500002.05.2023 19:41
-
нмрмгштщ21.04.2020 04:11