Определите, что будет напечатано в результате работы следующего фрагмента программы: Var s, k: integer; Begin s := 0; for k := 3 to 7 do s := s + 6; writeln(s); End.

ответ:42

Объяснение:

 цикл повторяется 5 раз ( от 3 до 7)

ты прибавляешь каждый раз по 6 => 6*7=42

C++

Объяснение:

#include <iostream>

using namespace std;

#include <string>

//На вход программы поступает неизвестное количество целых чисел, ввод заканчивается нулём.Найти среднее арифметическое всех двузначных чисел которые делятся на 7. С++

int main()

{

int number;

int count = 0;

float summ = 0;

int otvet;

cin >> number;

while (number != 0) {

 cin >> number;

 if ((number >= 10 && number <= 99) && (number % 7 == 0)) {

  summ += number;

  count++;

 }

 if (number == 0) {

  otvet = summ / count;

  cout << "Otvet: " << otvet << endl;

  break;

 }

}

}

на печать?) я не знаю языка программирования который печатает вывод... короче держи паскаль :

var

begin

readln(n);

if n=1 then begin writeln(31); exit; end;

if n=2 then begin writeln(28); exit; end;

if n=3 then begin writeln(31); exit; end;

if n=4 then begin writeln(30); exit; end;

if n=5 then begin writeln(31); exit; end;

if n=6 then begin writeln(30); exit; end;

if n=7 then begin writeln(31); exit; end;

if n=8 then begin writeln(31); exit; end;

if n=9 then begin writeln(30); exit; end;

if n=10 then begin writeln(31); exit; end;

if n=11 then begin writeln(30); exit; end;

if n=12 then begin writeln(31); exit; end;

Объяснение:

дай лучший ответ