Написать программу которая про суммирует все 2ух значные числа содержащие 1

201

416

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

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

bezin2000

Информатика

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

var a,a1,a2,sum,n,i: integer;

begin

readln (n);

for i: =1 to n do

begin

readln (a);

a1: =a div 10;

a2: =a mod 10;

if (a1=1) or (a2=1) then sum: =sum+a;

end;

writeln (sum);

end.

samsunguser

Информатика

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

program pr1; uses crt,graphabc; var y,x,a,b: real; beginclrscr; setwindowsize(400,400); line(0,200,400,200); line(200,0,200,400); setbrushcolor(clblack); a: =3.2; b: =2; x: =-30; while x< =30 do begin y: =-(a*sin(x+b)+x); circle(trunc(x*20+200),trunc(y*20+200),3); x: =x+0.1; end; end.

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

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

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

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

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

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

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

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

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

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