1.выбирайте правильную позу.
соблюдайте расстояние от глаз до монитора – 55-60 см (расстояние вытянутой руки).
выбирайте для работы за компьютером удобное кресло.
высота сиденья кресла (стула) должна быть такой, чтобы руки, положенные на клавиатуру, были расположены горизонтально.
2.старайтесь выглядеть достойно в глазах собеседников,
пишите грамотно,
человек, с которым вы общаетесь, может быть не один,
сдерживайте страсти,
будьте терпимы к недостаткам окружающий
3.1.1. на основании договора;
1.2. в форме воспроизведения, без согласия newsader и без выплаты ему вознаграждения, при условии, что такое использование осуществляется гражданином исключительно в личных целях.
1.3. без согласия newsader и без выплаты вознаграждения, но с обязательным указанием ссылки на newsader в соответствии с п. 5 настоящих правил в виде:
1.3.1. цитирования материалов или их части в оригинале и в переводе в научных, полемических, критических или информационных целях в объеме, оправданном целью цитирования, включая части текстовых материалов;
1.3.2. использования материалов и их частей в качестве иллюстраций в изданиях, радио- и телепередачах, звуко- и видеозаписях учебного характера в объеме, оправданном поставленной целью;
1.3.3. воспроизведения в прессе, сообщение в эфир или по кабелю публично произнесенных политических речей, обращений, докладов и других аналогичных произведений, если они являются частью материалов в объеме, оправданном информационной целью;
1.3.4. воспроизведения или сообщения для всеобщего сведения в обзорах текущих событий средствами фотографии, кинематографии, путем сообщения в эфир или по кабелю материалов или их частей, которые становятся увиденными или услышанными в ходе таких событий, в объеме, оправданном информационной целью;
Задача 1
var
y, x: integer;// Объявляем переменные типа Integer
begin// Начало блока
writeln('Введите X: '); //Выводим текст на экран
read(x); //Читаем значение введеное с кливиатуры и записываем его в переменную
y := 7 * x * 2 - 3 * x + 6; //Выолняем выражение
writeln('Результат: ', y);// Выводим результат
end. // конец блока
Задача 2:
var
a, b, c: integer;//Объявление переменных
begin
write('Введите длину ребра куба '); //Вывод текста на экран
read(a); //Читаем значение введеное с клавиатуры
b := a * a * a; //Вычисляем объем куба
c := 6 * sqr(a); //Sqr - квадрат числа
{Далее опять же вывод результата}
writeln('Объём куба равен ', b);
writeln('Площадь боковой поверхности куба равна ', c);
end.
Задача 3
var
k: integer;//Объявление переменных
begin
write('Введите число: '); //Вывод текста на экран
read(k); //Читаем значение введное с клавиатуры
if Odd(k) then //Odd - возвращает True - если значение нечетно и False если четно
writeln('Нечетное')
else
writeln('Четное');
end.
Задача 4:
var
a, b: integer;
begin
writeln('Введите a и b через пробел:');
readln(a, b);
if (b mod a = 0) then writeln('Число ', a, ' является делителем числа ', b)
else writeln('Число ', a, ' НЕ является делителем числа ', b);
end.
Задача 5:
var
a, b: real;
begin
writeln('Через пробел введите 2 числа: ');
read(a, b);
if a > b then //Условие если А больше Б
begin
a := a / 2; //Делим число А на 2 и выводим результат
writeln('A:= ', a, ' B:= ', b);
end
else //Иначе оставляем все как и было
writeln('A:= ', a, ' B:= ', b);
end.
