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

Заполните одномерный массив произвольными числами от 0 до 10.

размерностью 10. вычислите сумму элементов имеющих чётный номер.
нужна программа на паскаль

👇
Ответ:
Ziri12
Ziri12
07.12.2020

var a:array [1..10] of Integer;

i,s:Integer;

begin

Write('Массив ');

for i:=1 to 10 do

begin

a[i]:=random(11);

write (a[i], ' ');

if i mod 2 = 0 then s:=s+a[i]

end;

WriteLn;

Write('Сумма элементов имеющих чётный номер равна ', s)

end.

4,7(5 оценок)
Открыть все ответы
Ответ:
helpmeplease24
helpmeplease24
07.12.2020
//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
function
Transpose(a: array[,] of integer): array[,] of integer;
//Поворот на 90гр по часовой стрелке
begin
  var m := Length(a, 0);
  var n := Length(a, 1);
  Result := new integer[n, m];
  for var i := 0 to n-1 do begin
    for var j := 0 to m-1 do
      Result[i, j] := a[m-1-j, i];
  end;
end;

begin
  var n := ReadInteger('Введите n:');
//Заполнение матрицы NxN сл. числами и вывод на экран
  var a :=MatrixRandom(n, n);
  for  var i:=0 to n-1 do begin
    for var j:=0 to n-1 do
      Print(a[i,j]);
    println;
    end;
     println;

  Println('поворот влево на 90 гр');
  var b := Transpose(a);
  b:=Transpose(b);
  b:=Transpose(b);
  for  var i:=0 to n-1 do begin
    for var j:=0 to n-1 do
      Print(b[i,j]);
    println;
    end;
  println;

  Println('поворот вправо на 90гр');
  b := Transpose(a);
  for  var i:=0 to n-1 do begin
    for var j:=0 to n-1 do
      Print(b[i,j]);
    println;
    end;
 println;

 Println('поворот на 180 гр');
  b := Transpose(a);
  b := Transpose(b);
  for  var i:=0 to n-1 do begin
    for var j:=0 to n-1 do
      Print(b[i,j]);
    println;
    end;
end.
4,5(86 оценок)
Ответ:
vanyad09
vanyad09
07.12.2020

Первый шаг в отношениях между пользователем и программой –  это запуск программы пользователем. Затем можно выполнять в программе те действия, ради которых она и была создана.

Объяснение: Рассмотрим запуска программ:

 1)Из Главного меню можно запускать программы, которые в нем записаны.

Для примера возьмем стандартные программы. Дело в том, что Windows – не просто операционная система. В ее состав входит множество разнообразных прикладных программ или, как их называют приложений, такие как

калькулятор,графический редактор Paint,текстовые редакторы Блокнот и WordPad,служебные программы по обслуживанию дискаи др.

Стандартные программы в главном меню Windows XP

Эту группу программ называют Стандартные, потому что она входит в состав операционной системы и устанавливается вместе с установкой операционной системы.

Чтобы запустить, например, Калькулятор, надо пройти по маршруту: кнопка Пуск – Программы – Стандартные – название программы (“Калькулятор”).

2) При двойного щелчка по значку программы или по ярлыку на Рабочем столе Windows.

3) Щелчок по значку программы  в Панели задач Windows. Например, на рисунке после щелчка по значку будет открыт текстовый редактор MS Word.

4) При команды “Выполнить” в Главном меню Windows.

В открывшемся окне Запуск программы нужно указать открываемый файл, причем можно воспользоваться для этого кнопкой Обзор, которая откроет окно просмотра содержимого дисков и папок. В нем, открывая папки, нужно выделить и открыть запускающий файл программы. По умолчанию во всех папках будут показаны только запускающие и командные файлы, а также ярлыки.

5) Автоматический запуск программ, например:

при начальной загрузке Windows. Для того, чтобы это сделать, следует пройти по маршруту Пуск – Программы – Автозапуск.

Если поместить программы в меню Автозагрузка, то они будут автоматически запущены при начальной загрузке Windows.

при вставке в дисковод CD или DVD диска. При этом автоматически запускается программа, записанная на диске, правда, если автором диска не предусмотрено иное действие.

Иногда для избежания заражения вирусом автоматический запуск компакт-дисков отключают и сначала проверяют диск антивирусом.

по заданному графику. Такую возможность предоставляет встроенная в Windows программа-планировщик.

6) Двойной щелчок по значку или по имени программы в окне “Мой компьютер” или “Проводник”.

7) Двойной щелчок по значку или имени документа, обрабатываемого той или иной программой. Например, если щёлкнуть по значку с буквой «W», запустится программа MS

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