Функции Sqr, Abs, Sqrt, Sin, Cos, Arctan, Ln, Exp, Pi в Pascal.

Мы уже знаем, какие существуют функции для целых переменных. Это – нахождение модуля числа (Функция Abc), а также возведение числа в квадрат (Функция Sqr). В этом уроке мы рассмотрим функции, применяемые к дробным числам. Это функции Sqr - квадрат ...

Использование вложенного оператора If.

Условные операторы в Pascal можно вкладывать друг в друга. Для этого используется вложенный оператор IF. Рассмотрим это на примере программы, которая будет считать количество корней квадратного уравнения.

Функции Pred, Succ в Pascal.

В данном уроке мы рассмотрим функции, применяемые к типу CHAR. Функция Pred возвращает в качестве значения предшествующий символ, а функция Succ возвращает последующий символ.

Циклы и массивы

Вложенный арифметический цикл. Часть 2.

Примеры использования различных операторов цикла. Вложенный цикл.

Организация условного перехода. Оператор IF.

Для программирования разветвляющихся процессов, содержащих две ветви, используется оператор IF условного перехода (ветвления), имеющий две конструкции.

Уроки Паскаль

В данном уроке мы рассмотрим операции умножения и сложения в Pascal. Умножение в Pascal обозначается знаком «*», а сложение - знаком «+».

program number6;
uses crt;
var A, B, C: integer;
begin
clrscr;
A:=5;
writeln (A);
writeln ('A');
A:=A+1;
Writeln (' Теперь A=',A);
B:=7;
C:=A*B;
writeln ('Произведение=', C);
Readln
end.

Строка №3. В раздел описания переменных Var записываем 3 переменные «A,B,C» и в дальнейшем мы будем использовать только эти три переменные. После записи переменных через двоеточие указывается тип данных INTEGER (целый). Это означает, что наши переменные «A,B и C» могут быть только целыми числами.

В строке №6 мы присваиваем переменной «A» значение равное 5. Сначала записывается сама переменная, затем ставится знак присваивания (:=), а затем пишем число, которое нужно присвоить. Таким образом, на данном этапе в переменную «A» записывается значение равное 5.

В строке №7 записываем оператор Writeln. Этот оператор выводит сообщение, указанное в скобках на экран. Обратите внимание, что переменная «A», записанная в скобках после оператора Writeln стоит без апострофов ‘ ‘, поэтому на экран выведется не сама буква «A», а то значение, которое мы ей присвоили выше, т.е. число 5.

Строка №8. Здесь буква «A» стоит уже в апострофах, поэтому она сама и выведется на экран.

В строке №9 нашей переменной «A» мы присвоили значение «A+1», т.е. то значение, которое раньше было у «A» (это число 5), мы увеличили на 1 (теперь «A» равна 6). Здесь следует сказать, что при присвоении переменной нового значения, старое значение стирается. Т.е. если раньше в переменной «A» содержалось значение 5, то после выполнения строки №9 число 5 удалится и в переменной будет содержаться новое значение 6.

В строке №10 выводим на экран сообщение «Теперь A=». Это сообщение берется в апострофы, а далее через запятую записываем переменную «A». Т.е. на экран у нас выведется сообщение «Теперь A=» и значение переменной «A» (т.е. число 6).

В строке №11 второй переменной «B» мы присвоили значение 7.

В строке №12 третей переменной «C» мы присвоили значение «A» умноженное на «B». Знак * означает в паскале операцию умножения. Таким образом «C» теперь равно 6*7=42.

Строка №13.На экран будет выведено сообщение «Произведение=», а затем на этой же строчке будет выведено значение, которое мы присвоили переменной C.

Теперь наберем эту программу в Паскале и запустим ее.

umnozhenie i slozhenie v paskalj

umnozhenie i slozhenie v paskalj.

Комментарии  

 
-6 # Нео 02.12.2012 13:01
все слишкм просто...
 
 
+1 # Яна 11.02.2013 18:27
Не программист, при чем здесь это. Это на результат исчисления не влияет. Просто надо было написать,чтобы вывело А=5, теперь =6, произведение=42 . Поскольку это все элементарно, давайте не придираться
 
 
0 # Gr 15.02.2013 13:56
Логичнее:
program number6;
uses crt;
var A, B, C: integer;
begin
clrscr;
A:=5;
writeln (A);
writeln ('A составляет=', A');
A:=A+1;
writeln ('Прибавим к A единицу');
Writeln ('Теперь A=',A);
B:=7;
C:=A*B;
writeln ('Найдём C путём умножения A на B, B=',B);
writeln ('С=', C);
Readln
end.

Или я не прав?
 
 
-3 # Максим 06.10.2017 17:48
Так понятнее для тех кто не видит начальную програму.
 
 
+5 # ыы 29.06.2015 08:57
геморрой обеспечен :-*
 
 
+2 # Катя 18.10.2015 18:43
Пожалуйста , сделайте эти задания , если вам не трудно. А то я совершенно ничего не понимаю , так учитель на уроке ничего не объясняет :zzz

Составить программы:
1. Нахождение произведения двух наименьших из трех различных чисел (например, для чисел 2, 3 ,5 произведение равно 6)
2. Определение времени года в зависимости от введённого месяца (например, январь - зима)
 
 
+1 # Дисыч 02.12.2017 16:22
Хехех, лол, нужно читать. Это всё легко. Как тебе не стыдно за такие отмазки?
 
 
+1 # Владислав 19.11.2015 19:21
program Калькулятор;
uses crt;
var Первое_число, Второе_число, Ответ: integer;
begin
clrscr;
Первое_число:=96;
writeln ('Решение...');
Writeln (' первое число=',Первое_ число);
Второе_число:=90;
Writeln (' а второе=',Второе _число);
Ответ :=Первое_число-Второе_число;
writeln ('Ответ=', Ответ);
Readln
end.
я так сделал
 
 
0 # Владислав 19.11.2015 19:24
Где Первое_число:=9 6
Второе_число:=90
Пишем любую величину
А там где Ответ :=Первое_число-Второе_число;
Мелто - любой знак
 
 
+1 # Ярослав 09.12.2015 13:14
пользователь вводит 20 чисел. Числа в диапазоне от -1000 до 1000. Необходимо подсчитать произведение 2-х значных чисел
Помогите!!!
 
 
-2 # дима 25.02.2016 14:17
program number6;
uses crt;
var A, B, C: integer;
begin
clrscr;
A:=5;
write (A);
A:=A+1;
Write ('*');
Writeln (A);
B:=7;
C:=A*B;
writeln ('Произведение= ', C);
Readln
end.
 
 
-7 # женя 12.11.2016 15:23
Помогите пожалуйста. Нужно написать в Паскаль P=П над п 5 под ним n=1 (2x + корень n)
 
 
-3 # Vasil 29.09.2021 18:38
Не сложно должно быть
 
 
+2 # лифановчмо 01.04.2023 08:08
идите нахуй чмошники мне иза вас 2 вьебали хуеглоты и просто идите нахуй
 
 
0 # лифановчмо 01.04.2023 08:08
идите нахуй чмошники мне иза вас 2 вьебали хуеглоты и просто идите нахуй
 
   ГлавнаяПаскальУроки ПаскальТип данных Boolean. Значения True, False в Pascal.