NastyaCat21
27.12.2021 13:40

8°. Складіть проект у середовищі Scratch 2, у якому виконавець
відійде від верхньої межі Сцени на 200 кроків і намалює прямо-
кутник зі сторонами 100 і 80 кроків, якщо він стоїть біля цієї
межі, і підійде до верхньої межі Сцени, якщо він біля неї не сто-
їть. Збережіть проект у вашій папці у файлі з іменем завдання
3.4.8.​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Сацуки001
20.01.2022 12:11

1) Документ - это письменное подтверждение какого-либо события или факта

2) Текстовый документ - это представленная на бумажном, электронном или ином материальном носителе информация в текстовой форме

3) Раздел, строка, страница(это не точно)

4) Рассказ, письмо, справочник

5) Раздел - это часть текста, разделы могут включать в себя подразделы.

6) Текст, таблицы, рисунки (зависит это от того, какого типа документ)

7) Удобство редактирования, лёгкость копирования, лёгкость передачи по сетям

8) Электронная книга - это компактное устройство, которое предназначено для отображения текстовой информации, представленной в электронном виде

9) В электронных книгах существует поиск по тексту

10) С текста человек может передать свои мысли, чувства и эмоции

0,0(0 оценок)
Ответ:
madisha12
29.11.2021 05:06
1. 

program HelloWorld;

var n:array [1..15] of integer;

var c: integer;

var z,i: SmallInt;

 

begin

 for i:=1 to 15 do

     n[i] := random(1000);

      repeat

 z:=0;

 //сортировка

 for i:=1 to 15 do

     if n[i]> n[i+1] then

        begin  

            c:=n[i];

            n[i]:=n[i+1];

            n[i+1]:=c;

            z:=1;

        end;

    until z=0;

 for i:=1 to 15 do

    writeln(n[i])    

end.


2.

program HelloWorld;

var n:array [1..10,1..7] of integer;

var c: integer;

var z,i: SmallInt;

 

begin

 for i:=1 to 10 do

   for z:=1 to 7 do

     n[i,z] := random(1000);

 

 for i:=1 to 10 do

   for z:=1 to 7 do

   begin

     write('A[',i,',',z,']=');

     writeln(n[i,z]);

   end;

 

 for i:=1 to 10 do

   for z:=1 to 7 do

   begin

     if i = 5 then

       begin

         c := n[5,z];

         n[5,z] := n[7,z];

         n[7,z] := c;

        end;

   end;

 

writeln('');

 

 for i:=1 to 10 do

   for z:=1 to 7 do

   begin

     write('A[',i,',',z,']=');

     writeln(n[i,z]);

   end;

    

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота