Информатика: Напишите любые 5 программ с циклом со счетчиком в pascalabc

anonymous18

13.06.2023 21:04

Информатика

Есть ответ 👍

Напишите любые 5 программ с циклом со счетчиком в pascalabc

279

494

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

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

Crdsaadfa

Информатика

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

var a,b: byte; begin readln(a); for b: =1 to 20 do a: =a+1; writeln(a); end. var a,k,u: byte; begin readln(a,u); while a> u do begin k: =k+1; a: =a-1; end; end. типа такого?

safeer

Информатика

4,8(91 оценок)

Var a,b,c: integer; q: real; begin writeln ('a*x^2+b*x+c'); write('введите a: '); readln(a); write('введите b: '); readln(b); write('введите c: '); readln(c); q: =b*b-4*a*c; if q> 0 then writeln ('2 корня'); if q=0 then writeln ('1 корень'); if q< 0 then writeln ('0 корней'); end.

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

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

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

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

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

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

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

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

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

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