1) Браузер
2) Таблица
3) 2 ( обновить ссылку на странице, которая будет вести на новую страницу n, и на самой странице n)
4) Графически представлять данные с графиков и диаграмм, выводить на печать электронные таблицы; вычислять и анализировать данные, а также пересчитывать значения при изменении данных; создавать, открывать, редактировать, а также сохранять таблицы в файле
5)Название документа, название программы и кнопки управления окном
6)Числовые данные
7)Один столбец с числами
8)Параметры диаграммы, тип и вид диаграммы и источник данных диаграмм
Все ответы проверены
program dimavdovuskin497;
type t1 = integer;
t2 = double;
var n, i: t1;
x, summa, pr: t2;
begin
writeln('Напишите программу, вычисляющую: а) сумму n первых натуральных четных чисел; б) произведение n первых натуральных нечетных чисел.');
writeln;
write('Введите общее количество чисел: ');
readln(n);
writeln;
summa := 0;
pr := 1;
for i := 1 to n do
begin
write('Введите х: ');
readln(x);
writeln;
if (frac(x) = 0) then
begin
if (frac(x/2) = 0) then summa := summa + x
else pr := pr * x;
end;
end;
writeln('Сумма n первых натуральных четных чисел равна ', summa : 5 : 0);
writeln;
writeln('Произведение n первых натуральных нечетных чисел равно', pr : 5 : 0);
readln;
end.
program qq;
begin
Writeln ('ИмяФамилия');
Writeln ('ИмяФамилия');
Writeln ('ИмяФамилия');
Writeln ('ИмяФамилия');
Writeln ('ИмяФамилия');
Writeln ('ИмяФамилия');
Writeln ('ИмяФамилия');
Writeln ('ИмяФамилия');
Writeln ('ИмяФамилия');
Writeln ('ИмяФамилия');
end.
Объяснение:
Ну или (если с циклом)
program qq;
begin
for i:=1 to 10 do
Writeln ('ИмяФамилия');
end.