ГLCHIации. Вода - источник жизни»
ВСТАВКА ФИГУР В ПРЕЗЕНТАЦИЮ
3. В таблице
Найди эти
1. Рассмотри рисунок. Найди лишнее окно, которое не при
программе PowerPoint.
6
ә) Рів)
Голая Встанадай
2 Macer
Baatar
Восстанок
con
сайд Ради
Буфер 06 г.
Cale
од радоса е оборгоо
Озеро Баата-анальное
енге Аграас олоор
де
Озеро Баа-укарное лече проем
Becctowe nary peo NOE SOCIO NORS
Каста аеро акта гори по лине
непереохон солён азером после
Контрарам ское са круна
адреса
рассо
tе аn
4. Заполни
На казахск
| Безендіру
2. Рассмотри и напиши алгоритм создания слайда.
Көшіру
Геометрические фигуры
5. Раскрась
Облака
Пятиугольник
ТреугоЛЬНИК
Рыба, состоящая из
геометрических фигур.
Прямоугольник
var min_e, max_e, count, i, j, otn: integer; a: array[1..5, 1..7] of integer; srednee: real;
begin for i := 1 to 5 do begin writeln; for j := 1 to 7 do a[i, j] := Random(81); end; max_e := 1; min_e := 81; srednee := 0; for i := 1 to 5 do for j := 1 to 7 do begin if a[i, j] < min_e then min_e := a[i, j]; if a[i, j] > max_e then max_e := a[i, j]; if a[i, j] mod 5 = 0 then begin srednee := srednee + a[i, j]; count := count + 1; end; end; otn := max_e div min_e; srednee := srednee / count; for i := 1 to 5 do begin writeln; for j := 1 to 7 do write(a[i, j]:3); end; writeln; writeln(min_e, ' ', max_e, ' ', otn, ' ', srednee);end.
O: boolean;
begin
write('X1: ');
readln(x1);
write('Y1: ');
readln(y1);
write('X2: ');
readln(x2);
write('Y2: ');
readln(y2);
if (x1 < 0) and (x2 < 0) and (y1 < 0) and (y2 < 0) then O:=true;
if (x1 < 0) and (x2 < 0) and (y1 > 0) and (y2 > 0) then O:=true;
if (x1 > 0) and (x2 > 0) and (y1 > 0) and (y2 > 0) then O:=true;
if (x1 > 0) and (x2 > 0) and (y1 < 0) and (y2 < 0) then O:=true;
if O = true then write('TRUE')
else write('FALSE');
end.