Есть ответ 👍

Впаскале: 1.составить функцию и процедуру, которая определяет сумму всех чисел от 1 до n. 2.составить программу, которая определяет нод и нок двух чисел.

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

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


1) program gt; var n,s: integer; procedure   summa(n: integer; var s: integer); begin s: =((n+1)*n)div 2; writeln(s); end; begin read(n); summa(n,s); end. 1.2) program gt2; var n,s: integer; function summa(n: integer): integer; var  s: integer; begin s: =((n+1)*n)div 2; summa: =s; end; begin read(n); s: =summa(n); writeln(s); end. 2)program gt; label 3,9; var m,n,q,r,a,b: longint; begin read(m,n); a: =m; b: =n; 3: q: =m div n; r: =m mod n; if (r=0)then goto 9; m: =n; n: =r; goto 3; 9: m: =(a*b)div n; writeln('нод=',n); writeln('nok=',m); end.

//pascalabc.net //версия 3.3, сборка 1627 begin var a: =arrrandom(10,-99,99).println; writeln('кол-во положительных: ',a.where(x-> x> 0).count); write('кол-во четных : ',a.where(x-> x.iseven).count); end.

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

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

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

Caktus Image

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

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

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

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

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

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

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

GTP TOP NEWS