Цикл типа пока. 1) дана последовательность операторов: а: =1; b: =2; while a+b< 10 do begin а: =а+1; b: =b+1; end; s: =a+b сколько раз будет повторен цикл и какими будут значения переменных а, b, s после исполнения этой последовательности операторов? 2) сколько раз будет выполнен цикл? а) for i: =4 to 10 do s: =s+1 б) for i: =0 to 8 do s: =s+1 в) for i: =-3 to 3 do s: =s+1

1.

цикл будет выполнен 4 раза

a = 5

b = 6

s =   11

2.

a) цикл будет выполнен 7 раз

б) цикл будет выполнен 9 раз

в) цикл будет выполнен 7 раз

Using system; using system.collections.generic; using system.linq; using system.text; namespace consoleapplication1 {       class program       {               static void main(string[] args)               {                       console.writeline("введи a");                       double a = double.parse(console.;                       console.writeline("введи b");                       double b = double.parse(console.;                       console.writeline("1 - сложение, 2 - вычитание");                       int n = int.parse(console.;                       switch (n)                       {                               case 1:                                       {                                               double y = a + b;                                               console.writeline(y);                                               break;                                       }                               case 2:                                       {                                               double z = a - b;                                               console.writeline(z);                                               break;                                       }                               default:                                       {                                               console.writeline("выбрана несуществующая операция");                                               break;                                       }                       }                       console.readkey();               }       } }

// pascalabc.net 3.0, сборка 1088 const   n=30; var   a: array[1..n] of integer;   i,k: integer; begin   randomize;   writeln('*** исходный массив ***');   k: =0;   for i: =1 to n do begin       a[i]: =random(1001);       write(a[i],' ');       if (a[i] mod 3 = 0) and (a[i] mod 10 = 1) then inc(k)   end;   writeln;   writeln('количество найденных элементов равно ',k) end. тестовое решение: *** исходный массив *** 503 187 764 452 351 819 339 940 681 369 938 874 639 212 633 825 983 830 121 801 889 36 479 14 357 382 631 8 402 61 количество найденных элементов равно 3