Другие вопросы по теме Информатика
6vyvu
12.08.2019 14:10
Елизавета99929
12.08.2019 14:10
Камелия1231
12.08.2019 14:10
Викусик11112234556
27.05.2021 07:15
alekss84
27.05.2021 07:00
AKBARXXX
27.05.2021 05:49
timursharipov2
27.05.2021 05:03
looolll2k17
27.05.2021 04:15
JAHGH
27.05.2021 04:04
Популярные вопросы
- Знайдіть площу многокутника, якщо площа проекції цього многокутника...
3 - 1) Изобразите геометрическую модель промежутков: (-2; oo)(457)(-1;2(-9,...
3 - Аналитическая работа. А) Какое прозвище имел Филька? Как оно отражало...
1 - Привет! WhatsApp Messenger - это быстрое, простое и безопасное приложение....
1 - «Ақпарат» терминілатынның түсіндіру,баяндау, мәлімет дегенұғымдарды...
2 - (0,9*5+5*0,6)-(0,7*2+3*0,7) решить в столбик...
3 - відповідь на питання! Руські князі любили рідну землю? Так тому...
3 - Экологические проблемы РК РАБОТА В ПАРЕРеши задачу.6из двух городов,...
3 - Визнач, скільки рулонів шпалер потрібно прибати, щоб обклеїти ними...
3 - Дан массив целых положительных чисел. Найти произведение только...
1
7 строка должна быть: a:=b+1;
3 строка можно объединить со второй
Объяснение:
program Pr2;
var a,b,с,p:integer;
begin
readln(a);
readln(b);
a:=b+1;
p:=a*b;
c:=a*b;
writeln(p);
writeln(c);
end.