Определите, что будет напечатано в результате работы следующей программы. текст на трех языках програмирования. алгоритмический - алг нач цел s, k s : = s + 2 вывод s кон. бейсик s = 15 for k = 0 то 10 s = s + 12 next k print s end паскаль var s, k : integer; degin s : = 15 ; for k : = 0 to10 do s : = s + 2 ; write (s) ; end. ( 2 дня решить немогу)

1. Наверное в версии паскаль в первой строке не degin а begin
После исправления ошибки получим по шагам выполнение кода:
k = 0  s = 17
k = 1  s = 19
k = 2  s = 21
k = 3  s = 23
k = 4  s = 25
k = 5  s = 27
k = 6  s = 29
k = 7  s = 31
k = 8  s = 33
k = 9  s = 35
k = 10  s = 37

ответ: s = 37

ответ:37

S:=15
for k:=0 to 10 do ///цикл будет повторяться 11 раз считаем от 0 до 10
s:=s+2
s:=15+2+2+2+2+2+2+2+2+2+2+2=37

Я не знаю, на каком языке тебе нужно было это сделать, потому держи ответ на C++

Объяснение:

#include <iostream>

using namespace std;

int main()

{

   int arr[10]; //инициализируем массив из 10 элементов

   

   srand(time(NULL)); //инициализация генерации случайных чисел

   

   for (int i = 0; i < 10; i++) //в этом цикле мы заполняем наш массив случайными числами

   {

       int random = rand() % 100; //генерируется случайное значение от 1 до 100

       

       arr[i] = random; //каждому элементу массива дается сгенерированное значение

       

       cout << "Элементу массива" << i << "присвоено значение " << random << endl; //вывод в консоль, чтобы знать, какие значения сгенерировались.

   }

   

   //массив сгенерирован, теперь считаем четные числами

   

   int NumOfEven = 0; //переменная, в которую будет записываться количество четных чисел.

   

   for (int i = 0; i < 10; i++) //создаем цикл, который будет перебирать элементы

   {

       int num = arr[i]; //даем значение временной переменной, равное значению элемента массива

       

       if (num % 2 == 0) //проверка на чётность

       {

           NumOfEven = NumOfEven + 1; //если число четное, добавляем 1 к количеству четных чисел

       }

   }

   

   cout << "Количество чётных чисел в массиве = " << NumOfEven << endl; //вывод результата

}

алг

нач

цел й

вывод ('Введите номер месяца ')

ввод й

если й<1 или й>12 то вывод ('Месяца с таким номером не бывает') всё

если й=1 то вывод ('Январь') всё

если й=2 то вывод ('Февраль') всё

если й=3 то вывод ('Март') всё

если й=4 то вывод ('Апрель') всё

если й=5 то вывод ('Май') всё

если й=6 то вывод ('Июнь') всё

если й=7 то вывод ('Июль') всё

если й=8 то вывод ('Август') всё

если й=9 то вывод ('Сентябрь') всё

если й=10 то вывод ('Октябрь') всё

если й=11 то вывод ('Ноябрь') всё

если й=12 то вывод ('Декабрь') всё

кон