Составить программы в turbo pascal. 1)дано три точки a,b,c на числовой оси.найти длинну отрезка ac и bc и их сумму. 2)задано четыре целых числа a,b,c,d.выяснить произведение этих чисел больше 300? 3)дано целое число ,если оно положительное,то прибавить к нему 1,а если отрицательное.то отнять от него 2.вывести полученое число.
Ответы на вопрос:
первое
program proga;
uses crt;
var
a,b,c,x,y,z: integer;
begin
clrscr;
writeln('введите значения точек');
readln(a); readln(b); readln(c);
x=b-c;
y=c-b;
z=x+y;
readln;
end.
второе
program proga;
uses crt;
var
a,b,c,x,y,z: integer;
begin
clrscr;
writeln('введите 4 числа');
readln(a); readln(b); readln(c); readln(x); readln(y);
z=a*b*c*y*x;
if z> 300 then
writeln('произведение этих чисел больше 300')
else
writeln('произведение этих чисел меньше 300') ;
readln;
end.
и соответственно третье
program proga;
uses crt;
var
a: integer;
begin
clrscr;
writeln('введите число');
readln(a);
if a> 0 then
a=a+1;
writeln(a)
else
if a< 0 then
a=a-2;
writeln(a)
else
writeln('вы ввели 0');
readln;
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
маша301910.08.2021 06:11
-
Maks00p127.06.2023 04:25
-
блаблаблатруляля23.10.2020 05:15
-
VidioVizard10.06.2023 03:48
-
Тима7771103.01.2022 01:53
-
Настя4926115.12.2021 06:42
-
Мастер00211.07.2022 21:41
-
abekeev03.08.2021 11:20
-
dikushant25.06.2020 02:46
-
asylhan1124.08.2022 00:33
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.