
Вопрос задан 22.07.2023 в 20:26.
Предмет Информатика.
Спрашивает Зайцева Надя.
:Написать программу на Паскале В переменной Х – Ваша оценка. Вывести, что это за оценка Если «2»
- очень плохо, если «3» - удовл. , если «4» - хорошо, если «5» - отл.даю 20 баллов!!!

Ответы на вопрос

Отвечает Baituganov Janar.
Program n_15;
var x:real;
begin
writeLN('Введите оценку');
readLN(x);
If x=2 then writeLN('очень плохо');
If x=3 then writeLN('Удовлетворительно');
If x=4 then writeLN('Хорошо');
If x=5 then writeLN('Отлично');
If x<2 or x>5 then writeLN('Нет отметки');
writeLN('Ваша отметка- ',x);
end.
var x:real;
begin
writeLN('Введите оценку');
readLN(x);
If x=2 then writeLN('очень плохо');
If x=3 then writeLN('Удовлетворительно');
If x=4 then writeLN('Хорошо');
If x=5 then writeLN('Отлично');
If x<2 or x>5 then writeLN('Нет отметки');
writeLN('Ваша отметка- ',x);
end.



Отвечает Андріюк Аня.
Program n_1;
var x:integer;
begin
read(x);
case x of
1,2 : writeln('Очень плохо');
3: writeln('Удовлетворительно');
4: writeln('Хорошо');
5: writeln('Отлично');
else writeln('Ошибка');
end
end.



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Для написания программы на Паскале, которая будет выводить оценку в зависимости от значения переменной X, можно использовать следующий код:
pascalprogram GradeEvaluation; var X: integer; begin { Вводим оценку } write('Введите вашу оценку (от 2 до 5): '); readln(X); { Проверяем значение переменной X и выводим соответствующую оценку } case X of 2: writeln('Ваша оценка: очень плохо.'); 3: writeln('Ваша оценка: удовлетворительно.'); 4: writeln('Ваша оценка: хорошо.'); 5: begin writeln('Ваша оценка: отлично!'); writeln('Вы получаете 20 баллов!!!'); end; else writeln('Введено некорректное значение оценки.'); end; readln; end.
Программа позволяет ввести оценку в переменную X и затем выводит соответствующее описание оценки в зависимости от значения X. Если введено значение, отличное от 2, 3, 4 или 5, программа сообщит об ошибке ввода.


Похожие вопросы
Топ вопросов за вчера в категории Информатика

Информатика 572

Информатика 1113

Информатика 10

Информатика 32

Информатика 16

Информатика 578

Информатика 21
Последние заданные вопросы в категории Информатика
Предметы
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili