как можно быстрее
k>1?
Результат F(k)
ФИО
0
( a
g
Program v2_21;
VAR k:Integer;
Procedure fin:Integer);
Begin
Write('');
IF n>1 Then
Write('*');
Write('*');
ГEnd; ;
Begin
For k:=0 TO 2 DO
F(k);
End.
--
L
T
И.
И u
КЕ
0
B
А A
р
1.
Конечный
результат
на экране
M
Программа v2 22;
Процедура Ф;
Начало
Пометить;
Конец;
Начало
ПОКА СвобВпереди выполнить
Начало
Ф; РоботВперед; РоботВперед,
РоботНалево;
Конец.
113
331
Ответы на вопрос:
Популярно: Информатика
-
ltandreeva201622.05.2020 16:46
-
АлисаЛостек250724.08.2020 03:46
-
PolinaDudnik18.12.2020 02:15
-
AlenkaPro120.12.2021 04:34
-
moskvina0802.01.2022 04:44
-
Мираж00507.04.2021 16:37
-
Baby200113.02.2022 16:19
-
sasavotchel27.12.2021 23:45
-
Arianadrem09.01.2023 06:35
-
zvezda02621.07.2022 00:51