Запишите значение переменной k, полученное в результате работы следующей программы. текст программы на трёх языках программирования. алгоритмический язык алг нач цел k, i k : = 4 нц для i от 1 до 3 k : = i + 2*k кц вывод k кон бейсик dim i, k as integer k = 4 for i = 1 to 3 k = i + 2*k next i print k паскаль var k, i: integer; begin k : = 4; for i : = 1 to 3 do k : = i + 2*k; writeln(k); end.

Код программы
var
    k, i: integer;

begin
    k := 4;
    for i := 1 to 3 do
        k := i + 2 * k;
    Writeln(k);
end.

Вывод
43

Решение на c++:

#include <iostream>

#include <ctime>

int main()

{

   int N, i, a, b, k1 = 0, k2 = 0, s1 = 0, s2 = 0;

   int A[10000];

   std::cin >> a >> b >> N;

   srand(time(0));

   for (i = 0; i < N; i++)

   {

       A[i] = rand()%(b-a+1)+a;

       if (A[i] < 50)

       {

           k1++;

           s1 += A[i];

       }

       else

       {

           k2++;

           s2 += A[i];

       }

       std::cout << A[i] << " ";

   }

   std::cout << std::endl << ((k1 == 0) ? 0 : (s1*1./k1)) << " ";

   std::cout << ((k2 == 0) ? 0 : (s2 * 1. / k2)) << " ";

   return 0;

}

C++:

Первая задача. Вторую заливайте отдельно.

#include "pch.h"

#include <iostream>

using namespace std;

int main()

{

setlocale(LC_ALL, "Russian");

int n;

p:

cout << "Введи трехзначное число: "; cin >> n;

if (n > 999 || n < 100)

{

 cout << "Это не трехзначное число" << endl;

 goto p;

}

int r = n % 3;

if (r == 0)

{

 cout << "Число кратно трем. Первая цифра этого числа: " << (n - n % 100) / 100 << endl;

}

else

{

 cout << "Число не делится на три. Сумма первых двух цифр равна: " << (n - n % 100) / 100 + (n % 100 - (n % 100) % 10) / 10 << endl;

}

}