Написать код программы на языке паскаль для вычисления значений функции типа y=sqr(l/x) напишите подпрограмму обработки ошибок.

294

434

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

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

pv4419868

Информатика

4,5(62 оценок)

Var y,x,l: real; begin writeln('введите значение l и x соотвественно'); read(l,x); if x=0 then writeln('x не может быть равен нулю, так как дробь нельзя делить на ноль') else begin y: =sqr(l/x); writeln(y); end; end.

asvpdsh

Информатика

4,6(21 оценок)

Var s: string; c: char; i,k: integer; begin write('введите число: '); readln(s); c: =s[1]; k: =1; for i: =2 to length(s) do if s[i]=c then inc(k) else if s[i]< c then begin c: =s[i]; k: =1 end; writeln('наименьшая цифра ',c,' встретилась ',k,' раз(а)') end. тестовое решение: введите число: 3141592653589793 наименьшая цифра 1 встретилась 2 раз(а)

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

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

Задай свой вопрос

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

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

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

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

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

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

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