Какой информационный процесс происходит, когда мы высчитываем среднюю информацию за месяц? 1 обработка информации 2 получение информации 3 распространение информации
У композиції використовувалися прості геометричні форми, статичні, симетричні рішення. Традиційним було широке застосування орнаментики, скульптури і живопису. Планування комплексів і міст мало регулярний характер, орієнтувалися, звичайно, за сторонами світу. Великі міста мали мощені вулиці, зовнішній водопровід, оборонні споруди.
//прога на Pascal type film = record name : string[20]; age : byte; end; var a: array of film; n, i: byte; begin write ('Введите кол-во фильмов: '); readln (n); setLength (a, n); for i:=0 to n-1 do begin write ('Введите название фильма ', i+1, ': '); readln (a[i].name); write ('Введите возрастное ограничение фильма ', i+1, ': '); readln (a[i].age); end; writeln ('Введите возраст зрителя: '); readln (n); writeln (''); for i:=0 to length (a)-1 do begin if n>a[i].age then write ('Этот зритель может ') else write ('Этот зритель не может '); writeln ('пойти на фильм "', a[i].name, '"'); end; end.
//прога на Pascal`e var a: array of int64; n: longint; i : byte; begin write ('Введите кол-во чисел: '); readln (n); setLength (a, n); for i:=0 to n-1 do begin write ('Введите ', i+1, ' число: '); readln (a[i]); end;
for i:=0 to n-1 do begin writeln (''); writeln ('Число ', a[i], ':'); if (a[i] mod 2) = 0 then writeln ('Четное') else writeln ('Нечетное'); if (a[i] mod 3) = 0 then writeln ('Кратно 3-ем') else writeln ('Не кратно 3-ем'); if (a[i]<10) or (a[i]>99) then writeln ('Не 2-значное') else writeln ('2-значное'); end; end.
У композиції використовувалися прості геометричні форми, статичні, симетричні рішення. Традиційним було широке застосування орнаментики, скульптури і живопису. Планування комплексів і міст мало регулярний характер, орієнтувалися, звичайно, за сторонами світу. Великі міста мали мощені вулиці, зовнішній водопровід, оборонні споруди.