На одной фотографии всё уместить не получилось ;)
Var s,i: real;begini:=1;s:=12;if s<=100 then i:=i+1 elses:=1.2*s+2;writeln(s);<span>end.
Так попробуй</span>
<span>var f,i:integer;
begin
f:=1;
for i:=2 to 173 do f:=f+i;
writeln(f);
end<span>.
Результат:
</span><span>15051</span></span>
Шрифт
Размер шрифта
Полужирный
Курсив
Подчеркнутый
Цвет выеделения текста
Выравнивание по левому краю
Выравнивание по центру
Выравнивание по правому краю
Выравнивание по ширине
<span>1. Впиши носитель информации по образцу.
Компьютерная игра Магнитный диск
Ваша фотография фотобумага
Наскальный рисунок камень
Оценка в классном журнале </span><span>бумага</span>