Во-первых, тут есть синтаксическая ошибка: в конце первой строки отсутствует точка с запятой. Во-вторых, неверно определены диапазоны дат: нет названия города до 1703 года (на самом деле города тогда еще не было, но что-то все равно надо сообщить), не определен 1914 год, когда город был переименован в Петроград и 1924 год, когда город был переименован в Ленинград. И в-третьих, хоть это и не ошибка, но недочет программы: будут выполняться все три оператора if, даже если в первом из них искомая дата будет найдена.
Ниже предлагается исправленный вариант программы.
program name;
uses crt;
var a:integer;
begin
ClrScr;
Readln(a);
if a else
if (a>=1703) and (a<1914) or (a>=1991) then Writeln (‘Санкт-Петербург’)
else
if (a>=1914) and (a <1924) then Writeln (‘Петроград’)
else Writeln (‘Ленинград’);
ReadKey
end.
Источник: megashkola.com
#3 Ввод/Вывод данных в Pascal — Read, Readln, Write, Writeln — отличия, примеры
Чем заканчивается программа 1 балл end clrscr readln
️ Информатика
Чем заканчивается программа?
Ответ и решение
Ответ и решение
Ответ: Вариант 1
Чем заканчивается программа?
Ответ и решение
Ответ и решение
Ответ: Вариант 1
Чем заканчивается программа?
Ответ и решение
Ответ и решение
Ответ: Вариант 2
Похожие вопросы
Как заканчивается программа на Паскале?
Как заканчивается программа на Паскале?
4. правильного ответа нет
Источник: reshatel-testov.com
Проверьте,есть ли ошибки? 🙂 Программирование.
Program name
uses crt;
var a :integer;
begin clrscr;
readln (a);
if (a>=1703) or (a<1914) or (a>=1992) then writeln (‘Санкт Петербург’);
if (a>=1915) or (a <1924) then writeln (‘Петроград’);
if (a>=1925) or (a <=1991) then writeln (‘Ленинград’);
readln;
end.
Во-первых, тут есть синтаксическая ошибка: в конце первой строки отсутствует точка с запятой. Во-вторых, неверно определены диапазоны дат: нет названия города до 1703 года (на самом деле города тогда еще не было, но что-то все равно надо сообщить), не определен 1914 год, когда город был переименован в Петроград и 1924 год, когда город был переименован в Ленинград. И в-третьих, хоть это и не ошибка, но недочет программы: будут выполняться все три оператора if, даже если в первом из них искомая дата будет найдена.
Ниже предлагается исправленный вариант программы.
program name;
uses crt;
var a:integer;
PASCAL. Урок 2. Вывод (read/readln). типы данных(integer, real), переменные. ПАСКАЛЬ
begin
ClrScr;
Readln(a);
if a else
if (a>=1703) and (a<1914) or (a>=1991) then Writeln (‘Санкт-Петербург’)
else
if (a>=1914) and (a <1924) then Writeln (‘Петроград’)
else Writeln (‘Ленинград’);
ReadKey
end.
Новые вопросы
Геометрия, 1 месяц назад
География, 1 месяц назад
Литература, 2 месяца назад
Биология, 2 месяца назад
Математика, 5 лет назад
Алгебра, 5 лет назад
Лучшие помощники
Помощников пока нет:( Станьте первым!
- 2023 — Znanijam.net | Бесплатные знания для всех
- Контакты
- Пользовательское соглашение
- Политика обработки данных
Входя или регистрируясь на сайте, вы принимаете условия Политики обработки данных и Пользовательского соглашения.
Источник: znanijam.net