Главная Случайная страница Контакты | Мы поможем в написании вашей работы! | ||
|
Операция | Обознач | Тип аргументов | Тип результата | Примеры |
Сложение Вычитание Умножение | + - * | Real, Integer | Зависит от типов аргументов | 50+6=56 50+6.1=5.6E+1 |
Деление | / | Real, Integer | Real | 1000/2=5.0E+2 2/1000=2.0E-3 |
Деление нацело без остатка | div | Integer | Integer | 7 div 2=3; 2 div 7=0 23 div 10=2 |
Остаток от деления (целый) | mod | Integer | Integer | 7 mod 2=1; 2 mod 7=2 23 mod 10=3 |
Упражнение 3: Определить номер подъезда по номеру квартиры пятиэтажного дома, считая, что в каждом подъезде 10 квартир. Составить программу и блок-схему.
ProgramPodezd; VarNp,Nk:integer; Begin Write(Введите номер квартиры); Read(Nk); Np:=(Nk-1) div10 + 1; Writeln('Квартира № ',Nk,' находится в подъезде № ',Np); End. |
Домашние вопросы и задачи:
1. Даны числа 10 и 2. Число какого типа получится после
a) сложения б) умножения в) деления этих чисел?
2. Остаток от деления x на 2 = 1. Целая часть от деления x на 2 = 5. Определите x.
Задачи:
№13. Вычислите:
a)19 div 4= в) 12 div 4= д)-21 div 4= ж) -7 div (-4)= б)19 mod 4= г) 12 mod 4= е)-21 mod 4= з) -7 mod (-4)=.
№14. Какие значения примут переменные в результате выполнения программы?
program qq;
var a, b: integer;
begin a:= 5; b:= a + 2; a:= (a + 2)*(b – 3); b:= a div 5;
a:= a mod b; a:= a + 1; b:= (a + 14) mod 7;
end.
№15. С начала суток прошло x секунд. Сколько полных часов и минут прошло к этому моменту? Составить блок-схему и программу.
Дата публикования: 2014-10-30; Прочитано: 412 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!