Заполните таблицу по иформатике1 колонка - поколение(всего их 5),2 колонка - отличительный элимент(например, лампы) 3 колонка-период(например, 50-60 годы), 4 колонка- название эвм(например, мэсм), 5 колонка - фамилия изобреталетей(1.в мире. 2. в )​

CodePascal

const  amax = 100; var  a: array [1..amax] of integer;  i, n, ch, num: integer; begin  Writeln('Введите размер массива');  Readln(n);  ch := 0;  Writeln('Исходный массив');  for i := 1 to n do  begin    a[i] := Random(1, 100);    Write(a[i], '  ');    if not odd(a[i]) then begin      ch := a[i];      num := i;    end;  end;  Writeln;  writeln('Последний четный элемент массива: ', ch, '[', num, ']'); end.

Тестовое решение:

Введите размер массива

10

Исходный массив

58  50  43  68  74  45  74  20  83  11  

Последний четный элемент массива: 20[8]

#include <iostream>

using namespace std;

int main()

{

int day;

cout << "Введите номер дня недели: ";

cin >> day;

switch(day)

{

case 1:

cout << "Будни - понедельник";

break;

case 2:

cout << "Будни - вторник";

break;

case 3:

cout << "Будни - среда";

break;

case 4:

cout << "Будни - четверг";

break;

case 5:

cout << "Будни - пятница";

break;

case 6:

cout << "Выходные - суббота";

break;

case 7:

cout << "Выходные - воскресенье";

break;

default:

cout << "Такого дня недели нет";

break;

}

return 0;

}