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.
Методические указания предназначены для студентов очного отделения направления 031600 «Реклама и связи с общественностью» по дисциплине «Компьютерные технологии и информатика». Практический цикл посвящен изучению популярнейшего тестового редактора фирмы Microsoft Office Word 2007 (краткое название редактора Word). В настоящее время существует несколько версий этого программного продукта. Однако пользовательский интерфейс и приемы работы в среде Word последних версий практически не отличаются друг от друга, поэтому в методических указаниях нет конкретной привязки к определенной версии редактора. Целью практической работы является самостоятельное обучение основным технологическим операциям и приемам при создании разнообразных документов в среде Word. Практические работы предполагают последовательное изучение краткой теории и выполнение практических заданий. Причем, в основном, теория изучается в процессе выполнения заданий. Такой метод позволяет немедленно закрепить теоретические знания на практике и является достаточно эффективным. Выполнение всех 30 заданий позволит в достаточной степени овладеть основными навыками создания документов в среде Word и подготовит пользователя к самостоятельной работе. Методические указания подготовлены на кафедре «Информационные системы и технологии».
Границы печатаемой зоны (поля) можно задать и с мыши. <...> Кроме вышеуказанного границы абзаца можно установить и с маркеров на горизонтальной линейке <...> Чтобы это сделать необходимо выбрать вкладку «Главная» команду «Границы и заливка». <...> В появившемся окне диалога нужно выбрать закладку «Граница». <...> Чтобы границы ячеек таблицы были видны при печати необходимо указать их обрамление.
Объяснение:
