Как записать в тетрадь словесным алгоритмом???
«Проекти з вкладеними циклами і розгалуженнями»
Увага! Під час роботи з комп’ютером дотримуйтеся вимог безпеки життєдіяльності та санітарно-гігієнічних норм.
1. Відкрийте середовище Scratch 2.
2. Складіть проект, у якому виконавець 4 рази змінить образ, якщо буде натиснуто клавішу пропуск, або переміститься на 20 кроків управо, якщо буде натиснуто клавішу стрілка вправо.
3. Збережіть проект у своїй папці у файлі з іменем практична 6_1.
4. Складіть проект, у якому виконавець, поки він не доторкнеться до межі, буде повторювати такі дії: рухатися вгору та повідомляти деяке повідомлення, якщо буде натиснуто клавішу стрілка вгору, або рухатися вниз і повідомляти інше повідомлення, якщо буде натиснуто клавішу стрілка вниз.
5. Збережіть проект у вашій папці у файлі з іменем практична 6_2. 6. Закрийте середовище Scratch 2.
3.1. 200
3.2. for i:1 to 200 do a[i]:=random(100)-50;
3.3.
(т.к 4 байта)
либо -50 ... 50 (рандом)
3.4. Чтобы значения не "склеивались", т.к было расстояние между элементами
4.1. a[номер элемента] = значение элемента "перенос строки"
4.2. Для подсчета количества элементов равных 20
4.3. k - она объявлена, но не используется
4.4. Количество элементов равных 20
5.
var
a:array[1..300] of integer;
i,n,p,k: integer;
begin
p:=0;
n:=0;
randomize;
for i:1 to 300 do
a[i]:=random(40)-20;
for i:=1 to 300 do
write(a[i],' ');
writeln;
for i:=1 to 300 do
if a[i]=p then
begin
writeln('a[',i,']=',a[i]);
n:=n+1;
end;
writeln;
writeln(n);
end.
ꟷꟷꟷꟷꟷꟷ
Не забывайте сказать " "! и, если ответ удовлетворил, то выберите его как "Лучший"
Бодрого настроения и добра!
Успехов в учебе!
задание 1:
использовать Робот
алг
нач
цел с=0
нц
вверх
если слева стена то закрасить; с:=1 всё
кц при с=1 и слева свободно
нц пока снизу свободно
если слева стена то с:=1 иначе с:=0 всё
вниз
если с=1 и слева стена то закрасить всё
кц
нц
если снизу свободно то с:=0 всё
вправо
если снизу стена то
закрасить
если с=0 то с:=2 всё
всё
кц при с=2 и снизу свободно
кон
задание 2:
использовать Робот
алг
нач
цел с=0
нц
влево
если сверху стена то закрасить; с:=1 всё
кц при с=1 и сверху свободно
нц пока справа свободно
если сверху стена то с:=1 иначе с:=0 всё
вправо
если с=1 и сверху стена то закрасить всё
кц
нц
если справа свободно то с:=0 всё
вниз
если справа стена то
закрасить
если с=0 то с:=2 всё
всё
кц при с=2 и справа свободно
кон