program HelloWorld;
var k:integer;
begin
writeln('Введи сторону');
readln(k);
writeln(k*k)
end.
Уроки на неделе
1.Понедельник
1.1.Информатика
1.2.Русский язык
1.3.Литература
2.Вторник
2.1.Английский язык
2.2.Биология
2.3.География
3.Среда
3.1.История России
3.2.ОБЖ
3.3.Физкультура
4.Четверг
4.1.Обществознание
4.2.Черчение
4.3.Религии России
5.Пятница
5.1.Русский язык
5.2.Информатика
5.3.Физкультура
6.Суббота
6.1.МХК
6.2.Физика
6.3.Алгебра
P.S. думаю, что это можно назвать многоуровневым списком
Var
R:string;
begin
R:='0,017*100/2=0.85 ом';
writeln(R);
end.
Program zadanie;
begin
writeln('буря мглою небо кроет');
writeln('вихри снежные крутя');
writeln('то как зверь она завоет,');
writeln('то заплачет ,как дитя');
end.
<span>Отметь общие свойства, которыми обладают текстовая и графическая модель:
1) помогают хранить информацию об объекте (изображение и описание объекта хранят информацию: изображения – о внешнем виде, строении, описание – какую угодно)
2) имеют общий цвет и размер (у текста может быть какой угодно цвет и размер)
3) обладают свойством наглядности (текст не обладает)
4) используются для передачи информации об объекте (если передать изображение или описание объекта, получатель получит информацию об объекте)
Ответ: 1), 4)
</span>