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

Определите чему будут равны значения переменных a, b после выполнения серии команд присвоить: a = 46 b = -10 c = b b = a a = c

👇
Ответ:
CheryLi
CheryLi
28.08.2021

а = - 10

b = 46

4,6(67 оценок)
Открыть все ответы
Ответ:
Soldat098
Soldat098
28.08.2021
Cистема -совокупность взаимосвязанных между собой объектов. Составные части системы называются элементами или компонентами.   

СИСТЕМНЫЙ ПОДХОД - Метод рассмотрения каждого вопроса, задачи, явления, объекта как части более широкого единого и неразделимого целого - системы взаимосвязанных составных элементов. Системный подход предусматривает определение целей функционирования системы, выделение ее связей с другими системами. При системном подходе решения самой задачи ставится в зависимость от решения смежных задач и проблем более высокого уровня. 
 
4,4(48 оценок)
Ответ:
Серг4й
Серг4й
28.08.2021
1. Надо добавить точку в последней строке программы. Иначе работать не будет.
2. Меняется всего одна строка в программе:

program pr2;

type
  student = record {объявление нового типа данных student}
    LastName: string; {фамилия студента}
    bal: array [1..5] of integer; {массив для 5-ти оценок}
    average: real {средний студента}
  end;

var
  pupil: array [1..100] of student; {массив pupil (максимум из 100 элементов) типа student}
  n, i, j, s: integer;{переменные целого типа}

begin
  write('Введите количество студентов: ');
  readln(n);
  for i := 1 to n do
  begin{запрос данных по n студентам}
    with pupil[i] do
    begin
      Write('Введите фамилию студента №', i, ': '); {запрос фамилии студента под номером i}
      Readln(LastName);
      s := 0; {целочисленная переменная для определения суммы студента}
      for j := 1 to 5 do
      begin{цикл для обработки 5-ти оценок каждого студента}
        write('Введите оценку за экзамен №:', j, ': ' );
        readln(bal[j] );
        s := s + bal[j]; {суммирование 5-ти оценок студента}
      end;
      average := s / 5; {определение среднего значения и запись в переменную average}
    end;
  end;
  writeln;
  writeln( 'Студенты, имеющие средний больший или равный 4');
  for i := 1 to n do
  begin
    if pupil[i].average >= 4 then {если средний студента >=4}
    write(pupil[i].LastName,', ');
  end;
end.
4,5(82 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ