Скорее не знаки а символы это как бы объединение букв, цифр и знаков
program w7w7;
var a:real;
begin
readln (a);
if a<0 then writeln ('otritsatelnoe chislo');
if a>0 then writeln ('pologitelnoe chislo');
end.
Program qq;
uses crt;
var A:array [1..20] of integer; i: integer;
begin
for i:=1 to 20 do
readln (a[i]); //ввод массива. Не указали откуда дан массив, так что введем его через enter
for i:=1 to 20 do
if a[i]<10 then
a[i]:=0; //сравним каждый элемент массива с 10. если меньше 10, то заменим на ноль
for i:=1 to 20 do
write (a[i], ' '); //Вывод массива на экран
<span>end.</span>
<span>Отметь общие свойства, которыми обладают текстовая и графическая модель:
1) помогают хранить информацию об объекте (изображение и описание объекта хранят информацию: изображения – о внешнем виде, строении, описание – какую угодно)
2) имеют общий цвет и размер (у текста может быть какой угодно цвет и размер)
3) обладают свойством наглядности (текст не обладает)
4) используются для передачи информации об объекте (если передать изображение или описание объекта, получатель получит информацию об объекте)
Ответ: 1), 4)
</span>
Esli bi A45 bilo to tak a tocho pravilnii est?3 poprobava mojno