Прочитать с экрана 30 имен, сосчитать сколько среди них имен петя . замечание-использовать только 3 переменных. abc a-текущ имя(строковый) b-переменная(кол-во имен петя) с-переменная(цель-сколько всего имен)

143

175

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

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

Danil244564

Информатика

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

Решение на паскале: var a: string; b, c: byte; begin b : = 0; c : = 0; for c : = 1 to 30 do begin readln(a); if a = 'петя' then b : = b + 1; end; write(b); end.

mrcanxer

Информатика

4,4(63 оценок)

Определим функцию f (x) = x^2 - 5cos(x-1); необходимо найти ноль функции f (x) , т.е. значение х, при котором f(x) = 0; f(x) обратится в 0 , если cos(x-1) > 0 => - pi/2 < x < pi/2 => => (2 - pi)/2 < x < (2 + pi)/2 корня будет два. определим интервал для первого корня. левая граница а = - 0,57, правая граница b = 1 для второго корня левая граница а = 1, правая b = 2 корни будем находить методом деления пополам. интервал [ a, b] делится пополам и определяется знак функции в этой точке, в зависимости от знака изменяется левая или правая граница интервала. программа будет следующей: function f(x: real): real; begin f: =x*x-5*cos(x-1); end; { основная программа } var a,b,c,eps: real; k: integer; { a - начало интервала, b - конец } begin write('a = '); readln(a); write('b = '); readln(b); if f(a)*f(b)< 0 then begin write('точность вычислений eps: '); readln(eps); k: =1; while abs(a-b)> eps do begin c: =(a+b)/2; if f(c)< > 0 then begin if f(c)*f(b)< 0 then a: =c else b: =c end; k: =k+1; end; writeln('корень = ',a: 12: 8); writeln('количество итераций: ',k); end else writeln('интервал задан неверно'); end. a = -0.57 b = 1 точность вычислений eps: 0.00001 корень = -0.51726021 количество итераций: 19 a = 1 b = 2 точность вычислений eps: 0.00001 корень = 1.83345795 количество итераций: 18

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

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

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

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

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

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

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

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

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

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