Жауап берейік 1. Paint редакторында сурет салу үшін дайын фигуралар-
ды қайдан алуға болады?
2. Paint редакторындағы фигураларды пайдаланып, су-
ретті қалай саламыз?
3. Фигураның стилін қалай өзгертуге болады?​

1.Запоминать,фантазировать,вспоминать,забывать.

2.Отличается тем,что память одного человека(он помнит свои воспоминании,их никто кроме него не может знать),а память человечества-это Например,несколько людей были вместе на собрании у них будут одинаковые воспоминания,которые они могут обсудить между собой.

3.Потому что информацию мы в скором времени забудем. А оперативная память-временная. Примеры:кол-во денег которое мне надо взять с собой что бы доехать завтра до вокзала; номера упражнений по геометрии которые надо сделать дома до завтра.

4.Достоинства оперативной памяти: не занимает место в долговременной, через некоторое время удалится(если речь про компьютер); позволяет возвращать несколько действий назад(например в ворде)

Недостатки: загружает компьютер; малое кол-во памяти

Достоинства долговременной памяти: почти не затормаживает компьютер; большое кол-во памяти.

Недостатки: Поиск файлов может занять некоторое время; не вся информация может туда загрузится.

5.а) носитель - табличка, форма информации - числовая или символьная

б) носитель - открытка, форма информации - смешанная, т.к там будут и рисунок, и текст

в) носитель - билет. форма - смешанная, т.к. там будут и текст, и числа

г) носитель - газета, форма - смешанная, т.к там будут и текст, и рисунки, и числа

д) носитель - диск, форма - видеоинформация

Решения должны работать на любом диалекте, хотя не проверял...

№1
program Task1;
var a:integer;
begin
read(a);
if a<0 then begin write(sqr(a));
end else if a>0 then begin write(a) end;
end.
№2
program Task2;
var x,z:integer;
begin
read(x);
if x>0 then begin z:=x*x;end;
write(z);
end.

Улучшенный вариант (работает под PascalABC.Net последних обновлений):

№1
begin
var a:integer;
read(a);
if a<0 then begin write(sqr(a));end else
if a>0 then begin write(a) end;
end.
№2
begin
var x:integer;
read(x);
if x>0 then x*=x;write(x);//Результат будет выведен в любом случае, вне зависимости от того, x>0 или нет
end.