Question

Задача1Введите числа в переменные a, b и c и напишите программу, которая меняет местами значения переменных по следующей схеме, чтобы в переменной а оказалось первоначальное значение переменной с, в переменной b – значение а, в переменной с – значение b.
Написать программу в pascal abc

Answer 1

тут либо фото нужно,либо тебе так не скажут.

Answer 2

фото чего?

Answer 3

var
a,b,c,m,n:integer;
begin
writeln('Введи а,b,c');
readln(a,b,c);
m:=a;
n:=b;
a:=c;
b:=m;
c:=n;
writeln(a,b,c);
readln;
end.

Answer 4

я не так написал

Answer 5

program homework1;
var
A, B, X, D : real;
K : real;
begin
writeln('Введите значение переменной a ');
readln(A);
writeln('Введите значение переменной b ');
readln(B);
D := A + B;
x:=2 * a * b;
K:=D / X;
writeln('Итог: ', K:1:1, ' ');
end.

Answer 6

так я и пишу, добавь проверку деление на нуль. если у тебя а или b буде нуль, то прога не запустится

Answer 7

да

Answer 8

var
A, B: real;
begin
writeln('Введите значение переменной a ');
readln(A);
writeln('Введите значение переменной b ');
readln(B);
if (a*b<>0) then writeln('D=',((a+b)/(2*a*b)):3:3);
else writeln('ошибка деление на нуль');
readln;
end.