ЗАДАЧА 1

var a:integer;

begin

writeln('Введите число');

readln(a);

if a mod 2=0

then writeln('Четное число')

else writeln('Нечетное число');

end.

ЗАДАЧА 2

var a,b,c:integer;

begin

writeln('Введите длину первой стороны');

readln(a);

writeln('Введите длину второй стороны');

readln(b);

writeln('Введите длину третьей стороны');

readln(c);

if (a=b)and(b=c)and(a=c)

then writeln('Треугольник является равносторонним');

if (a=b)or(b=c)or(a=c)

then writeln('Треугольник равнобедренный');

if (a<>b)and(b<>c)and(a<>c)

then writeln('Треугольник разносторонний');

end.

ЗАДАЧА 3

var a,b,c,d:integer;

begin

writeln('Введите длину первой стороны');

readln(a);

writeln('Введите длину второй стороны');

readln(b);

writeln('Введите длину третьей стороны');

readln(c);

writeln('Введите длину четвертой стороны');

readln(d);

if (a=b)and(b=c)and(c=d)

then writeln('Четырехугольник является квадратом');

if (a=b) and (c=d)or(a=c)and(b=d)or(a=d) and(c=d) or(b=c) and(d=a)

then writeln('Четырехугольник является прямоугольником');

else Writeln('Четырехугольник является трапецией');

end.

Способ №1

var n,i:integer;

begin

readln(n);

i:=1;

while i<=n do

 if i mod 2=0 then

 begin

  writeln(i);

  i:=i+1;

 end;

readln;

end.

Способ №2

var n,i:integer;

begin

readln(n);

for i:=1 to n do

 if i mod 2=0 then

  writeln(i);

readln;

end.

Способ №3

var n,i:integer;

begin

readln(n);

i:=1;

repeat

 if i mod 2=0 then

  begin

   i:=i+1;

   writeln(i);

   end;

until i=n;

end.

Домашнее задание

Var i,n:integer;

begin 

writeln('Введите число');

readln(i);

n:=0;

ehi le i<>0 do begin 

i:=i div 10;

n:=n+1;

end;

writeln('Количество цифр',n);

end.

Сумма трех чисел

Электронные таблицы 

Домашнее задание №1

1) Что такое электронные таблицы?

Электронные таблицы (табличный процессор) - это прикладная программа, предназначенная для организации табличных вычислений на компьютере. Электронными также называют и таблицы, созданные с помощью одноименных программ в памяти компьютера. 

2) Назначение ЭТ.

С помощью электронных таблиц, пользователи, не обладая специальными знаниями в области программирования, имеют возможность определять последовательность вычислительных операций, выполнять различные преобразования в исходных данных, представлять полученные результаты в графической форме.

3) Что такое ячейка, столбец, строка, диапазон ячеек в ЭТ?

Ячейка- наименьшая структурная единица электронной таблицы, образуемая на пересечении столбца и строки.

Строка ввода- адрес текущей ячейки и вводимые в нее данные.

Диапазон ячеек – это группа ячеек, находящихся рядом друг с другом.

4) Что такое рабочая книга и рабочие листы?

Документ Excel называется рабочей книгой. Рабочая книга представляет собой набор рабочих листов, каждый из которых имеет табличную структуру и может содержать одну или несколько таблиц.

5) Перечислите типы данных в ЭТ.

В работе с электронными таблицами можно выделить три основных типа данных: числа, текст и формулы.

Числа. Для представления чисел могут использоваться несколько различных форматов (числовой, экспоненциальный, дробный и процентный). Существуют специальные форматы для хранения дат (например, 25.09.2003) и времени (например, 13:30:55), а также финансовый и денежный форматы (например, 1500,00р.), которые используются при проведении бухгалтерских расчетов.

Текст. Текстом в электронных таблицах является последовательность символов, состоящая из букв, цифр и пробелов.

Формулы. Формула должна начинаться со знака равенства и может включать в себя числа, имена ячеек, функции и знаки математических операций. Однако в формулу не может входить текст.

Домашнее задание здесь.

Задание на карантин:

1) 1

2) 4
3) 2
4) 1
5) 3
6) 4
7) 4
8) 2
9) 3
10) 1
11) 1
12) 1
13) 4
14) 3
15) 2