Teacher’s day is celebrated each year on the first Sunday of the October. Given natural number n, that represents the number of the year. Output the date of the Teacher’s day of that year. Input
2010
Output
3
//использовании только for и if в коде и с объяснениями

var c,a,b,i,j,l: integer; begin  cls;

  write('введите через пробел отрезок');   read(a,b);   for i: =a to b+1 do  begin    j: =2;     l: =round(sqrt(i));     while (i mod j < > 0) and (j < = l) do                                                                            begin                                                                              inc(j);                                                                             end;       if (j > l) then                                    begin                                      write(c,' ');                                       c: =i;                                     end;   end; end.

для матрицы 8*8

код

00111111

01000001

10000001

01000001

00111111

00010001

00100001

11000001

объем 8 байт

для символьного 1 байт в ascii

2 байта в unicode

320 * 1024 = 327680 мб

327680 / 700 = ,=> нужно 469 дисков. 469 * 15грамм = 7035 гр = 7кг 35 гр

program ms; uses crt; var a: array [1..10] of integer; l,k,s,i: longint; beginclrscr; writeln('введите 10 элементов массива'); for i: =1 to 10 dobegin    readln(a[i]);     if a[i]< 0 then l: =l+a[i];     if a[i]> 0 then k: =k+a[i]; end; s: =l*k; writeln(s); readkey; end.