Есть ответ 👍

Все задачи нужно выполнить в Паскале.

1. Рассчитать значения y при каждом х. х = 3, 4, ..., 25: y = 2t2 + 5,5t – 3, если t = x + 2.

2. Составить программу, которая запрашивает пароль (трехзначное число + 2 символа) до тех пор, пока он не будет правильно введен. Верный пароль должен быть задан в виде константы.

3. Из натурального трехзначного числа удалить заданную цифру. Число и цифру вводить с клавиатуры.

4. Вводится четырёхзначное число (xysz). Вывести сумму xy + sz. Начальные данные необходимо ввести с клавиатуры.

В отчет включить текст программ на Паскале, реакцию ЭВМ.

194
330
Посмотреть ответы 2

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

Belcard
4,4(96 оценок)

PascalABC.NET

#1

function Y(x:integer) := 2*((x+2)**2)+5.5*(x+2) - 3;

begin

 var Xes := Range(3, 25);

 Xes.Tabulate(p -> Y(p)).Println;

end.

#2

const PASS = '123ab';

begin

 var rpass := Readstring('Pass: ');

 while rpass <> PASS do begin

   rpass := Readstring('Wrong pass. Try again: ');

 end;

 print('Correct password. Welcome');

end.

#3

begin

//Сначала читаем цифру, которую надо удалить, а уже потом число.

 var X := ReadChar();

 var number := ReadInteger().ToString.ToCharArray.ToList;

 while number.Contains(X) do number.Remove(X);

 number.JoinIntoString.Println;

end.

#4

begin

 var X := ReadInteger();

 Print((x div 100)+(x mod 100));

end.

Объяснение:

AmAss
4,8(64 оценок)

Var x,y: longint; begin write('сколько дней в текущем месяце? '); readln(x); write('какое сегодня число? '); readln(y); writeln('количество дней до конца текущего месяца: б',x-y) end.

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS