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

Вставь, пропущены слова: заголовок программы тело программы, начинается служебным словом оператор присваивания оператор ввода данных переменные целого типа описываются служебным словом запуск программы на выполнение команда оператор цикла с постусловием квадратный корень вычисляется переменная в программировании характеризуется продолжите предложение или ответьте на вопрос: массив – это одномерный массив имеет следующие характеристики описания элементов массива через раздел констант: как называется параметр, определяющий место элемента в сколько элементов в массиве a=2, -2, 2, -2, 2: доступ элементу массива осуществляется по: адресу; имени; номеру; ничего из вышеперечисленного массив d состоит из нечетных чисел от 11 до 21. установите тип массива: вещественный целый символьный логический

👇
Ответ:
vvickina
vvickina
07.02.2020
Только некоторые знаю
заголовок: Program вроде
Тело: begin
присваивания: :=
ввод: readln(), read()
целые: integer
корень: sqrt()
var сама переменная и ещё всякие типы как strong, integer, real и т.д.
4,7(57 оценок)
Открыть все ответы
Ответ:
Nika096
Nika096
07.02.2020
uses crt;
var a, b, c, i, n, j :integer;   
s :array[1..10000] of integer;
begin
      clrscr;
      writeln('Введите размер массива');
      read(n);
      for i:=1 to n do 
          begin 
          s[i]:=random(46)-15; 
          writeln ('s[', i,']=', s[i]); 
          end;
      a:=s[1];for i:=1 to n do 
          if s[i]>a then 
              begin 
              a:=s[i]; 
              b:=i; 
              end;
      writeln ('Наибольший элемент s[', b, ']=',a);
end.

P.S. Надеюсь на благодарность и лучший ответ.
4,4(56 оценок)
Ответ:
hdjdhb
hdjdhb
07.02.2020

Проверено на Паскале АВС:

 

Program byalodenis;
uses crt;
const n=10;
var
  e:array[1..n] of integer;
  min,max,i: integer;
begin
  writeln('*** alphaues is thinking... ***');
  writeln('***          OK             ***');
  writeln();
  writeln('Элементы массива:');
  randomize;
  e[1]:=random(100)-50;
  write (e[1]:5);
  max:=e[1];
  min:=e[1];
  for i:=2 to n do
    begin
      e[i]:=random(100)-50;
      write (e[i]:5);
      if e[i]>max then
        max:=e[i];
      if e[i]<min then
        min:=e[i];
    end;
  writeln();
  writeln('Сумма максимального и минимального элементов равна ',max+min);
end.

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