По технике безопасности запрещено работать на персональном компьютере

Надо соблюдать правила и слушать учителя,и включать и выключать компьютер по требованию учителя,если включить не спросив,то могут записать замечание. за не соблюдение техники безопасности на уроке.

Только при разрешении учителя)) а если не спросил, то не соблюдение техники безопасности)

#include < iostream> using namespace std; int main() { setlocale(0,""); // это что бы на было cout< < "  сижу за решеткой в темнице сырой."< < endl; cout< < "вскормленный в неволе орел молодой,"< < endl; cout< < "мой грустный товарищ, махая крылом,"< < endl; cout< < "кровавую пищу клюет под окном,"< < endl; cout< < "клюет, и бросает, и смотрит в окно,"< < endl; cout< < "как будто со мною задумал одно; "< < endl; cout< < "зовет меня взглядом и криком своим"< < endl; cout< < "и вымолвить хочет: «давай улетим! "< < endl; cout< < "мы вольные птицы; пора, брат, пора! "< < endl; cout< < "туда, где за тучей белеет гора,"< < endl; cout< < "туда, где синеют морские края,"< < endl; cout< < "туда, где гуляем лишь да »"< < endl; return 0; }

Var a: array[1..1000]of integer; b: array[1..1000]of integer; i,n,summ: integer; begin writeln('введите кол-во цифр'); readln(n); writeln('введите цифры'); for i: =1 to n do readln(a[i]); for i: =1 to n do begin if (a[i]> =10)and (a[i]< 100) then b[i]: =a[i]; end; for i: =1 to n do begin if (a[i]> =100) and (a[i]< 1000) and (a[i] mod 4=0) then summ: =summ+a[i]; end; for i: =1 to n do begin if b[i]> 0 then write(b[i],' '); end; writeln; write('сумма 3-х значных чисел кратных 4=',summ); end.