Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
CatolizatoRRR
10.04.2022 10:11 •
Информатика
Есть код php, который связан с библиотекой mysql. Авторизация. Когда регистрирую аккаунты, они записываются в таблицу. но когда пытаюсь авторизоваться, пишет, что "аккаунт не найден", хотя он записан в таблице
Показать ответ
Ответ:
annagrits66
31.07.2022 03:14
1)
var
s: string[6];
n: integer;
begin
s := 'отлично';
n := length(s);
writeln(length('отлично'));
writeln(n);
end.
Изначально выставлен тип string[6], значит если присвоить строку больше, то ее обрежет по 6 символов, вот и весь прикол
ответ 6
2) рисунок
3)var
s, s1: string;
n: integer;
begin
s := 'информатика';
s1 := copy(s, 3, 5);
n := pos(s, s1);
writeln('s=', s);
writeln('s1=', s1);
writeln('n=', n);
end.
Вывод
s=информатика
s1=форма
n=0
Все верно, в s1 не содержится s, а наоборот
0,0
(0 оценок)
Ответ:
liza20038333
29.09.2020 05:41
Var
i, n, s: integer;
begin
readln(n);
i := 0;
s := 0;
while i < 7 do
begin
if (n mod 2 = 1) then begin
s := s + n;
i := i + 1;
end;
n := n + 1;
end;
writeln(s);
end.
var
i, n, s: integer;
begin
readln(n);
i := 0;
s := 0;
repeat
if (n mod 2 = 1) then begin
s := s + n;
i := i + 1;
end;
n := n + 1;
until i >= 7;
writeln(s);
end.
var
i, n, s: integer;
begin
readln(n);
n := n + (n + 1) mod 2;
s := 0;
for i := 1 to 7 do
begin
s := s + n;
writeln(n);
n := n + 2;
end;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
annnnka16
14.02.2020 12:06
Стаблицы, на одной улице стоят в ряд 4 дома, в которых живут 4 человека: билл, джон, алан и хью. известно, что каждый из них владеет ровно одной из следующих профессий:...
MaxZvanie
07.09.2022 11:08
Разделить массив, заполненный случайным образом только положительными числами, на два - четных и нечетных. составить блок схему и написать программу....
timurSeytzhan
07.09.2022 11:08
Вставьте гласные буквы в последовательность символов так, чтобы получилось слово, обозначающее одно из устройств ввода-вывода информации. скнр, прнтр, клвтр, мнтр, мшь,...
Солнцеголовик
07.09.2022 11:08
Нормальный пульс человека 60 ударов в минут .напишите программу,которая определит здоров ли человек....
mishasviderski
07.09.2022 11:08
Рассмотрите каждый из следующихрассмотрите каждый из следующих объектов как систему, взаимодействующую с окружающей средой. опишиту входы и выходы этой системы. а) лук,...
icidarmitrim
12.11.2020 07:22
Напишите программу, которая циклически сдвигает элементы массива вправо (например, если элементы нумеруются, начиная с нуля, то 0-й элемент становится 1-м, 1-й становится...
bershteindanik
24.06.2021 05:05
Назовите 5 европейских государств в алфавитном порядке и их столицы...
Редискa
29.06.2020 16:18
Как сфоткать и поставить её тут в школьных знаниях...
HAHAEZ2010
09.02.2021 17:20
Вкоробке лежит восемь карандашей.в коробке лежит восемь карандашей. все разного цвета. наугад вынимают один. какой информационный объем в битах сообщения о событии вынутый...
tania071168
05.06.2022 18:49
Сучасні пристрої зберегання повідомлень, передовання і опрацювання...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
s: string[6];
n: integer;
begin
s := 'отлично';
n := length(s);
writeln(length('отлично'));
writeln(n);
end.
Изначально выставлен тип string[6], значит если присвоить строку больше, то ее обрежет по 6 символов, вот и весь прикол
ответ 6
2) рисунок
3)var
s, s1: string;
n: integer;
begin
s := 'информатика';
s1 := copy(s, 3, 5);
n := pos(s, s1);
writeln('s=', s);
writeln('s1=', s1);
writeln('n=', n);
end.
Вывод
s=информатика
s1=форма
n=0
Все верно, в s1 не содержится s, а наоборот
i, n, s: integer;
begin
readln(n);
i := 0;
s := 0;
while i < 7 do
begin
if (n mod 2 = 1) then begin
s := s + n;
i := i + 1;
end;
n := n + 1;
end;
writeln(s);
end.
var
i, n, s: integer;
begin
readln(n);
i := 0;
s := 0;
repeat
if (n mod 2 = 1) then begin
s := s + n;
i := i + 1;
end;
n := n + 1;
until i >= 7;
writeln(s);
end.
var
i, n, s: integer;
begin
readln(n);
n := n + (n + 1) mod 2;
s := 0;
for i := 1 to 7 do
begin
s := s + n;
writeln(n);
n := n + 2;
end;
writeln(s);
end.