М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Zero00000
Zero00000
08.06.2023 02:44 •  Информатика

Що вiдбудеться пiсля виконання фрагмента програми: kil:=0; For i:=1 to 5 do if A[i]>0 then kil:=kil+1

👇
Открыть все ответы
Ответ:
markdanilov2002
markdanilov2002
08.06.2023
Const
  n = 10;
var
  a: array[1..n] of integer;
  i, j, t: integer;
  flag:boolean;
 
begin
  Randomize;
  Writeln('Исходный массив');
  for i := 1 to n do
  begin
    a[i] := random(101)-50;
    Write(a[i]:4)
  end;
  Writeln;
  i:=1;
  repeat
    flag:=true;
    for j := 1 to n-i do
      if a[j] > a[j+1] then
      begin t := a[j]; a[j] := a[j+1]; a[j+1] := t; flag:=false end;
    Inc(i);
  until (i>n-1) or flag;
  Writeln('Отсортированный по возрастанию массив');
  for i := 1 to n do Write(a[i]:4);
  Writeln
end.

Тестовое решение:
Исходный массив
 -32  -7   2   2  50 -33   1  31   4 -16
Отсортированный по возрастанию массив
 -33 -32 -16  -7   1   2   2   4  31  50
4,5(39 оценок)
Ответ:
Nekotin0
Nekotin0
08.06.2023

Холст – это чистое пространство, которое дается нам для совершения каких-либо действий в разнообразных программах. Например, в графических редакторах холст - это пространство, которое дается нам для рисования рисунка.

Сохранить проект по указанному адресу можно только через пункт меню "Save as copy. Choose a file format". Но тоггда отсутствует возможность редактирования проекта. Если сохранять файл используя пункт меню "Save as Paint 3D project" проект сохраняется по неизвестному адресу. Указать путь нет никакой возможности. Куда сохраняется проект?

4,6(75 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ