Инка1999
30.03.2021 12:58

с таким простым, но все же сложным заданием буду очень благодарен 1. Создайте документ программы MS Excel (2007).

2. Импортируйте на первый лист таблицу из файла «Кинетическая энергия сердечного выброса» в ячейки, начиная с А1.

3. Залейте заголовок таблицы красным цветом. Установите внешнюю границу заголовка таблицы толстой пунктирной линией красного цвета.

4. Внизу таблицы объедините ячейки А23:Е23 одну. Напишите в ней: «SV – ударный объём», объедините А24:Е24, напишите: «DA – диаметр аорты»; объедините А25:Е25, напишите: «ET – период изгнания», объедините А26:Е26, напишите: «CE – кинетическая энергия сердечного выброса».

5. Рассчитайте кинетическую энергию сердечного выброса по формуле:

Установите для ячеек этого столбца числовой формат с числом десятичных знаков равным 6.

6. Добавьте столбец «Группа». В этом столбце произведите вычисления с функции Если: если кинетическая энергия сердечного выброса < 0,00002 - то 1 группа, от 0,00002 до 0,0001 – 2 группа, если выше 0,0001 – 3 группа.

7. С автофильтра сформируйте 3 группы пациентов относительно их группы. Поместите данные по каждой группе на отдельный лист. Ярлычки листов закрасьте красным цветом, полученным листам дайте название, соответствующее данным, которые он содержит.

8. Рассчитайте для каждой группы средние значения ударного объёма, периода изгнания, диаметра аорты, кинетической энергии сердечного выброса. Скопируйте полученные значения на новый лист (дайте название листу «Гистограмма 1»)

9. Постройте гистограмму для полученных параметров. По оси - средние значения параметров, по оси - группа пациентов. Назовите диаграмму «Кинетическая энергия сердечного выброса», введите подписи, легенду. Примените заливки столбцов текстуру (на ваш выбор).

ФИО пациента SV (мл) DA (мм) ET (сек) CE (Дж)

Мухин А. К. 84,19 180,53 0,24

Архипов Д. Ю. 74,50 199,52 0,31

Трофимов П. В. 59,94 231,57 0,23

Мартынов Е. В. 73,64 264,88 0,34

Емельянов О. М. 64,85 215,10 0,33

Горшков О. Н. 65,53 252,11 0,21

Чернов Н. В. 45,36 206,21 0,18

Овчинников О. Г. 41,68 254,89 0,28

Селезнев Л. М. 53,42 265,74 0,35

Панфилов Н. И. 87,29 209,86 0,27

Копылов М. Б. 62,42 202,54 0,31

Михеев Р. У. 82,54 248,31 0,27

Галкин М. Р. 76,38 217,06 0,27

Назаров Е. И. 70,09 254,89 0,19

Лобанов Н. Н. 66,29 196,88 0,28

Лукин С. Т. 78,17 221,25 0,39

Беляков А. А. 64,79 187,62 0,38

Потапов В. А. 41,24 220,05 0,44

Некрасов М. Ф. 69,00 248,48 0,42

Хохлов С. В. 33,87 259,84 0,18

CE (Дж)
0,000084
0,000040
0,000024
0,000023
0,000021
0,000019
0,000017
0,000014
0,000014
0,000013
0,000013
0,000012
0,000011
0,000010
0,000006
0,000004
0,000002
0,000002
0,000002
0,000001

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
dimus99
09.04.2020 16:06

4.Операционная система — комплекс программ, обеспечивающий управление аппаратными средствами компьютера, организующий работу с файлами и выполнение прикладных программ, осуществляющий ввод и вывод данных.

5.Обмен данными между компьютером и различными периферийными устройствами (терминалами, принтерами, гибкими дисками, жесткими дисками и т. ...

Обеспечение системы организации и хранения файлов.

Загрузка программ в память и обеспечение их выполнения.

Организация диалога с пользователем.

6.извини, не знаю

надеюсь

0,0(0 оценок)
Ответ:
эйй4
22.07.2021 22:10
Программа подсчитывает количество слов длиной в 5 символов во введенном тексте. Но работать она не будет, есть ошибки:
1. Встречен repeat но нет until
2. Есть 3 begin, но только 2 end
3. Константа N лишняя. Нигде в программе не используется
После исправления ошибок программа с краткими комментариями будет выглядеть так:

program Zinaida;
var
  i, k: integer;
  inString: String;
  isize, count: integer;
begin
  write('String: ');
  readln(inString); //ввод текста
  k := length(instring); //длина текста
  if instring[k] = '.' then dec(k);
  //цикл для поиска пробелов и
  //слов с длиной 5 символов
  for i := 1 to k do
  begin
    if instring[i] <> ' ' then inc(isize);
    if (instring[i] = ' ') or (i = k) then
    begin
    //если длина слова = 5 то увеличиваем count на 1
      if isize = 5 then inc(count);
      isize := 0;
    end;
  end;
  write('Количество слов из пяти букв', count);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота