program название;
var a, b, s, p:integer;
begin
writeln ('Введите число a');
readln (a);
writeln ('Введите число b');
readln (b);
s:=a+b;
p:=a*b;
writeln ('Сумма чисел равна:', s);
writeln (Произведение чисел равно:', p);
end.
Объяснение:
/ - деление.
* - умножение.
sqrt - квадратный корень (всё что будет в корне заключается в скобки).
sqr - квадрат (всё что возводится в квадрат заключается в скобки).
В начале вводишь данные с клавиатуры (значение переменной a и значение переменной b).
Переменной s присваивается сумма переменных a и b.
Переменной p присваивается произведение переменных a и b.
Затем, выводится ответ.
Поделитесь своими знаниями, ответьте на вопрос:
No 4 «параметры страницы» цель: закрепить навыки работы с различными параметрами шрифта, абзаца. научиться применять различные параметры страницы. для изменения ориентации страницы необходимо посмотреть справа на редактирование страницы - далее найти ориентация - выбрать книжная или альбомная. также справа можно настроить поля, для этого нужно нажать кнопку поля. можно выбрать из предложенных вариантов или задать свои, нажав «другое» в открывшемся диалоговом окне ввести необходимые параметры добавления номера страницы. справа есть раздел стили - далее номер. установить следующие параметры: ориентация страницы альбомная поля: левое 3, правое 1, верхнее и нижнее 1, 25 вставить номер страницы внизу по центру первая строка отступ на 0, 5 отступ абзаца слева 3; справа 2 выравнивание текста по ширине межстрочный интервал 1, 1 интервал после абзаца 10 пт шрифт текста courier new размер шрифта 13 пт цвет текста - оранжевый набрать текст: самій великий и могущественный из греческих богов, тромовержец, сын реи (земли) и кроноса (времени кронос безжалостно пожирал всех своих детей, опасаясь, что они восстанут против него. рея зевса, своего шестого ребенка, дар кроносу проглотить вместо младенца камень, завернутый в пеленки. возмужавший зевс заставил отца вернуть им детей и вместе с ними вступил в борьбу с кроносом и титанами за власть над миром. зевс освободил из тартара циклопов и сооруких великанов - тека-онхейров и с их низверг туда титанов. ему титан прометей, который перешел на его сторону. свергнув кроноса, зевс и его братья разделили свои аладения. зевс оставил себе небо, посейдону досталось море, а иду - одземное царство душумерших. и стал зевс царить на слиме е окружении сониа богов. рядом с зевсом на троне сидит его жена, величественная богиня гера. снимок на комп.
q: Single; // Результат. Если число будет больше, то указать Double
i: Single; // Число из которого необходимо получить результат. Если число будет больше, то указать Double
p: Single; // Процент. Если процент будет всегда целым числом, то указать Byte
begin
writeln('Введите число => ');
read(i);
writeln('Введите процент, который хотите расcчитать из введенного числа => ');
read(p);
while p < 0 do
begin
writeln('Процент не может быть меньше нуля, введите новое значение => ');
read(p);
end;
q:=(i / 100) * p;
writeln('Ваш результат из числа => ', i, ', ', p, '% = ', q);
end.