Программу пришлось немного править, что б заработала
var
k, s: integer;
Dat: array[1..10] of integer;
begin
Dat[1] := 7;
Dat[2] := 9;
Dat[3] := 10;
Dat[4] := 5;
Dat[5] := 6;
Dat[6] := 7;
Dat[7] := 9;
Dat[8] := 8;
Dat[9] := 6;
Dat[10] := 9;
s := 0;
for k := 1 to 10 do
s := s + Dat[k];
writeln(s);
end.
Вывод
76
Ну во-первых блокнот, это чистый текстовый редактор. (Вы не можете в нём вставлять картинки, рисовать схемы).
А что вы имели под поинтом? PowerPoint? Если её, то это программа для создания презентаций, в неё можно вставлять и музыку, видео и картинки.
Если вы хотели сказать Paint, то это графический редактор. В нём вы можете передавать информацию посредством рисования и написания текста на изображении (в блокноте этого делать нельзя). <span />
var i:integer;
begin
for i:=15 to 90 do if i mod 15 = 0 then write(i,' ');
end.
Нет нельзя, т.к. в блокноте содержатся только текстовые данные без форматирования, а таблица - это форматированный текст (текст, имеющий форму таблицы).
В-3
О-16
Д-5
О-16
Л-13
А-1
З-9
К-12
А-1
<span>ВОДОЛАЗКА</span>