Регистрация Спросить otvet5GPT
petrovaanastasia26
25.08.2020 20:12
Информатика
Есть ответ 👍

Определите значение переменной s var s,k6: integer; begin s: =0; for k=6 to12do s=s+10 write(s); end

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

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

Dagrf
Dagrf
4,5(99 оценок)
После слова begin: переменной s присвоено значение 0. дальше идет цикл, повторяющийся 7 раз для значений k: 6,7,8, ,12 при каждом проходе цикла переменная s увеличивается на 10, т.е в результате она увеличится на 7 * 10 = 70. т.к. в начале она была равна 0, то в конце ее значение будет 0 + 70 = 70.
zomarova003
zomarova003
4,5(28 оценок)
// pascalabc.net 3.0, сборка 1128 begin   var k: =readinteger('укажите номер записи k: ');   var a: =readlines('t1.txt').select(x-> length(           where(x-> x< > 0).toarray;   var n: =a.length;   if k> n then writeln('в файле записей меньше, чем ',k)   else writeln('сумма равна ',a.min+a[n-k+1]) end. а теперь "школьный вариант" // pascalabc.net 3.0, сборка 1128 var   t: text;   min,l,m,n,k: integer;   s: string; begin   k: =2; // вторая от конца запись   assign(t,'t1.txt'); reset(t);   min: =1000; m: =0;   while not eof(t) do begin       readln(t,s); inc(m);       l: =length(s);       if (l> 0) and (l< min) then min: =l       end;   close(t); reset(t);   k: =m-k+1;   if k< 1 then writeln('в файле нет стольких строк')   else begin       m: =0;       while m< > k do begin readln(t,s); inc(m) end;       writeln('сумма равна ',min+length(s))       end;   close(t) end.

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

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

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

Caktus Image

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

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

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

  • Сколько это стоит?

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

  • Могу ли я использовать otvet5GPT в школе?

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

  • В чем отличия от ChatGPT?

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

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

GTP TOP NEWS