1. Алина решила создать свой проект.
Домоги Алине изменить параметры страни в тестовом редакторе Word
Отметь галочкой правильный ответ)
| Разметка страницы - Ориентация –Альбомная/Книжная
Главная - Разметка страницы – Ориентация
| Разметка страницы –Книжная Альбомная
| Разметка страницы - Ориентация -Книжная/Альбомная
Разметка страницы – Вставка-Книжная Альбомная
Вставка - Номер страницы
III
var
b, a: real;
n: integer;
begin
clrscr;
repeat
Write('Выберите фигуру (1-квадрат, 2-прямоугольник)');
Readln(n);
case n of
1:
begin
write('Сторона квадрата=');
readln(a);
Write('S=', a * a);
end;
2:
begin
write('Стороны прямоугольника=');
readln(b, a);
Write('S=', b * a);
end;
else exit;
end;
until false;
end.
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, а наоборот