М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
vladoosmartich
vladoosmartich
11.10.2021 00:15 •  Информатика

Составе программу для решения а4 из встроенного (см.рис. два алгоритма:
1.с использованием алгоритмической конструкции следование.
2. с использованием алгоритма.
pascal abc net​

👇
Открыть все ответы
Ответ:
azizbekboboniyozov
azizbekboboniyozov
11.10.2021

var a:array[1..N] of real;

Так как массив вещественного типа, то и должен хранить вещественные числа, также он может хранить и целочисленные элементы, но целочисленный массив НЕ может хранить вещественные числа.

-5.5 это вещественное число

3.5 - вещественное

-2 - целочисленное

среда четверг суббота - это всё строчный тип данных

-3i-5+2i - здесь уже спорная ситуация, по сути, это тоже всё одно число, если будет известно i, однако знак умножение опущен, а значит среда не сможет понять данное действие

ответ: -5.5 3.5 -2

4,8(83 оценок)
Ответ:
Samsas
Samsas
11.10.2021
У if'ов небыло begin и end;
у значений массива n небыли проставленны ' ' одинарные кавычки для букв.
у b и v в условиях не те типы данных, поэтому немогут они внутрь себя вместить букву, а только цифры, исправил с integer на char.
не знаю что должна выводить программка, begin и end'ов нету и у циклов. Без begin и end'ов трудно мне просчитать что выведет программа.

Program shifer;var z,a,m,s,j,x:integer;b,v:char;k:array[1..100] of char;n:array[1..100] of char;BEGINn[1]:='а';n[2]:='б';n[3]:='в';n[4]:='г';n[5]:='д';n[6]:='е';n[7]:='ё';n[8]:='ж';n[9]:='з';n[10]:='и';n[11]:='й';n[12]:='к';n[13]:='л';n[14]:='м';n[15]:='н';n[16]:='о';n[17]:='п';n[18]:='р';n[19]:='с';n[20]:='т';n[21]:='у';n[22]:='ф';n[23]:='х';n[24]:='ц';n[25]:='ч';n[26]:='ш';n[27]:='щ';n[28]:='ъ';n[29]:='ы';n[30]:='ь';n[31]:='э';n[32]:='ю';n[33]:='я';n[34]:='а';n[35]:='б';n[36]:='в';readln(a);for m:=1 to a do  readln(b);  for j:=1 to 33 do     x:=0;    if b=n[1+x] then      begin        v:=n[1+x+3];        z:=0;        k[1+z]:=v;        z:=z+1;      end    else      begin        x:=x+1;      end;  writeln(k);END.
4,8(75 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ