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

На языке Паскаль нужно создать тест и программа должна выставить оценку. Во для теста: №5, 12, 16, 23, 24 Кружочками отмечены правильные ответы.

👇
Ответ:

Какой класс

Объяснение:

4,7(96 оценок)
Ответ:

ответ: На во ответил правильно, не понял тебе перевод нужен

Объяснение:не знаю ли тебе это:

program test;

uses crt;

var i,right,mark,v: longint;

   answer,true1,true2,true3,true4,true5: char;

begin

 right:=0;   // Счётчик правильных ответов

 v:=5;       // Количество во Правильный ответ на во Во Вариант ответа');

        writeln('b) вариант ответа');

        writeln('c) Вариант ответа');

        read(answer);

        if answer=true1 then inc(right);

     end;

     if i=2 then begin

        writeln('Во Вариант ответа');

        writeln('b) Вариант ответа');

        writeln('c) Вариант ответа');

        read(answer);

        if answer=true2 then inc(right);

     end;

     if i=3 then begin

        writeln('Во Вариант ответа');

        writeln('b) Вариант ответа');

        writeln('c) Вариант ответа');

        read(answer);

        if answer=true3 then inc(right);

     end;

     if i=4 then begin

        writeln('Во Вариант ответа');

        writeln('b) Вариант ответа');

        writeln('c) Вариант ответа');

        read(answer);

        if answer=true4 then inc(right);

     end;

     if i=5 then begin

        writeln('Во Вариант ответа');

        writeln('b) Вариант ответа');

        writeln('c) Вариант ответа');

        read(answer);

        if answer=true5 then inc(right);

     end;

 end;

 if right>1 then mark:=right

 else mark:=2; // Оценка, если во больше 5, то там другая формула.

 writeln('Ваша оценка ',mark,'. Вы дали ',right,' правильных ответов');

4,4(38 оценок)
Открыть все ответы
Ответ:
sogoyantigran
sogoyantigran
21.03.2022

Все ответы на тест за 16 неделю)

1.Как называется определённым образом организованная совокупность данных, которая относится к определённой предметной области, для хранения во внешней памяти и постоянного использования? ответ введите строчными буквами.

база данных

2.Как называется программное обеспечение, которое применяется для создания баз данных, хранения и поиска в них необходимой информации? ответ введите полностью строчными буквами, НЕ аббревиатурой.

система управления базами данных

3.Какие возможности СУБД предоставляет пользователю?

И)Все варианты верны.

4.Что является основными объектами СУБД?

Ж)Все варианты верны.

5.Как называется команда и результат обращения пользователя к СУБД для поиска, удаления, сортировки, добавления и обновления данных? ответ введите строчными буквами.

запрос

6.Как называется документ, который формируется на основе таблиц базы данных и запросов?

Отчёт

7.Как называется выделенная область окна СУБД OpenOffice Base? ответ введите строчными буквами во множественном числе.

объекты

8.Укажите расширение файла БД.

.odb

9.Какое условие должно выполняться для эффективной работы БД?

Непротиворечивости данных

10.Какая функция позволяет выбрать несколько атрибутов сразу из нескольких таблиц и получить новую таблицу с результатом?

Запрос

11.Для чего предназначены формы в OpenOffice Base?

 

Для ввода данных в удобном порядке.

12.Как называется выделенная область на рисунке?

Панель инструментов

13.Сколько полей в таблице, представленной на рисунке? ответ введите в числовой форме.  

4

14.Сколько записей в таблице, представленной на рисунке? ответ введите в числовой форме.

3

15.Какое поле является ключевым?

Нет верного ответа

16.Что из перечисленного не является СУБД?

OpenOffice Writer

Объяснение:

Все ответы верны и взяты из самого теста)

4,4(66 оценок)
Ответ:
Zeus41
Zeus41
21.03.2022

pascal

Объяснение:

var

 p, s: real;

 x1, x2, x3, y1, y2, y3: integer;

function dlina(x1, y1, x2, y2: integer):real;

begin

 dlina := sqrt(sqr(x2 - x1) + sqr(y2 - y1));

end;

begin

 Write('Введите координаты точки A: '); ReadLn(x1, y1);

 Write('Введите координаты точки B: '); ReadLn(x2, y2);

 Write('Введите координаты точки C: '); ReadLn(x3, y3);

 p := (dlina(x1,y1,x2,y2) + dlina(x2,y2,x3,y3) + dlina(x1,y1,x3,y3)) / 2;

 s := sqrt(p*(p-dlina(x1,y1,x2,y2))*(p-dlina(x2,y2,x3,y3))*(p-dlina(x1,y1,x3,y3)));

 WriteLn('Площадь треугольника равна S = ', s:1:3);

end.

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