Функции Copy, Pos, процедуры Delete, Insert.

Функция Copy позволяет копировать из строки часть символов. Функция имеет 3 параметра. Copy (st, index, count). St-строка из которой копируют, Index-номер символа, с которого начинается копирование, Count-количество символов, которое будет ...

GotoXY в Pascal.

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

Textcolor, Window, Textbackground в Pascal.

Текст, который мы выводим на экран с помощью процедуры Writeln или с помощью оператора Write можно изменять. Процедура Textcolor используется для изменения цвета выводимого текста. Процедура Textbackground изменяет цвет фона, на котором выводится ...

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

ФАЙЛЫ ЗАПИСЕЙ

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

Подпрограммы, определенные пользователем.

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

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

В данном уроке мы рассмотрим операции умножения и сложения в 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.

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

Составить программы:
1. Нахождение произведения двух наименьших из трех различных чисел (например, для чисел 2, 3 ,5 произведение равно 6)
2. Определение времени года в зависимости от введённого месяца (например, январь - зима)
Ответить
 
 
+1 # Дисыч 02.12.2017 16:22
Хехех, лол, нужно читать. Это всё легко. Как тебе не стыдно за такие отмазки?
Ответить
 
 
+2 # Владислав 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
Не сложно должно быть
Ответить
 
 
0 # Angelo 09.04.2025 19:24
These soul-soothing melodies and heartfelt lyrics weave a tapestry of love, longing,
and warmth. Let the tender harmonies embrace
you like a gentle hug, perfect for quiet nights, heartfelt memories,
or moments shared with someone special.

Look into my webpage - lifeearth17: http://dinamicamail.com/__media__/js/netsoltrademark.php?d=Beautybrands.my.id%2F2025%2F04%2F03%2Flagu-indonesia-yang-mengena-di-hati-melodi-yang-menyentuh-jiwa%2F
Ответить
 
 
0 # Julieta 26.05.2025 04:25
Magnificent website. Lots of useful information here. I am sending it
to a few buddies ans also sharing in delicious. And of course, thanks on your sweat!


Here is my web site - jualfoodtruck: https://yachtschool17.bravejournal.net/warung-kaos-kuliner-mewujudkan-cita-cita-dengan-desain-food-truck
Ответить
 
 
0 # Osvaldo 24.09.2025 20:12
Взрослый доступен через надежные и проверенные веб-сайты.

Изучите надежные источники для получения качественного контента.


Feel free to surf to my web page - mom hd com: https://Kolab.network/pricing/
Ответить
 
 
0 # Layne 09.10.2025 19:03
Write more, thats all I have to say. Literally, it seems as though you relied on the video to make your point.
You definitely know what youre talking about, why throw away
your intelligence on just posting videos
to your weblog when you could be giving us something informative to read?


Look into my page :: khủng bố giết người: https://www-ga888.com/
Ответить
 
 
0 # Alina 12.10.2025 13:01
I love what you guys tend to be up too. This kind of clever work and coverage!

Keep up the terrific works guys I've incorporated you guys to my personal blogroll.


My page; Digital Signage: https://Datavis.co.id/
Ответить
 
 
0 # Mamie 18.10.2025 01:09
Hey! I just wanted to ask if you ever have any issues with hackers?
My last blog (wordpress) was hacked and I ended up losing several weeks of hard work due to no back up.
Do you have any solutions to prevent hackers?

My blog Live Draw Sgp: http://128.199.234.73/
Ответить
 

Добавить комментарий

   ГлавнаяПаскальУроки ПаскальОперации умножения и сложения в Pascal.