Презентацию можно создать в PowerPoint'е. Запуская его, первой страницей будет титульный лист. На нем пишется тема презентации и кто подготовил. Чтобы добавить слайды нужно нажать на кнопку "Создать слайд" (см. первый скрин). Чтобы презентация была красочнее есть вставка различных объектов: изображений, звуков, фигур и прочего (см. второй скрин). Нажимаете на нужную кнопку, выберите, что надо и оно будет в презентации. Также есть различные темы оформления, их можно скачивать из Интернета или пользоваться уже загруженными (см. третий скрин). Есть анимация слайдов и показов слайдов, тоже можно выбрать (см. четвертый и пятый скрины).
Есть очень много примеров в YouTube или обычных статьях. Пусть подруга лучше их посмотрит/прочитает.
Var n,m,osn: integer; function nmbdec(var n,osn: integer): integer; var nmb,l,s,k: integer; begin nmb:=0; s:=0; k:=n; l:=1; while k>0 do begin s:=k mod 10; k:=k div 10; nmb:=nmb+l*s; l:=l*osn; end; Result:=nmb; end; { конец функции} begin write('число: '); readln(n); write('квадрат какого числа: '); readln(m); osn:=10; while osn>=2 do begin osn:=osn-1; if nmbdec(n,osn)=sqr(nmbdec(m,osn)) then begin writeln('основание системы = ',osn); break; end; end; end.
X:real;
Begin
Write('X = ');ReadLn(X);
if X>0 then Write('Y = ',X)
End.
Var
a:integer;
Begin
For a:= 5 to 20 do
WriteLn('V(',a,') = ',a*a*a)
End.