1) Посоревнуйтесь, кто быстрей напечает какое небудь известное высказывание.
2) Спросити кто сможет нарисовать в пэинте цветочек, кто быстрей тот и выграл.
3) Представьте мир без компьютеров, что бы вы делали?
4) Подумайте, что можно добавить в компьютер? Как его усовершенстовать?
<span>программу для вычисления суммы ряда</span>
<span>"C:\TEACHER\TXT\DOC\Информатика.txt" - полное имя файла
Можно разбить на каталог - "</span>C:\TEACHER\TXT\DOC" - и имя файла - "Информатика.txt".
Так как сейчас файл по условию находится в подкаталоге, то, если перейти на каталог выше, мы окажемся в изначальном каталоге. То есть "C:\TEACHER\TXT"
Взять сломанные карандаши
Взять точилку
Вставить карандаш в точилку
Заточить
Повторят пока не закончиться карандаши
Ответ: программа выдаст 150, если в ней исправить ошибки. Текст исправленной программы представлен ниже:
var
n, s: integer;
begin
N := 4;
S := 0;
While n<= 13 do begin
S := s +15;
N := n+1;
End;
Write (s);
end;