var
d: integer;
a,b: real;
begin
write('a = '); readln(a);
write('b = '); readln(b);
write('введите номер операции '); readln(d);
case d of
1: writeln(a, ' + ', b, ' = ', a + b);
2: writeln(a, ' - ', b, ' = ', a - b);
3: writeln(a, ' * ', b, ' = ', a * b);
4: begin
if b < > 0 then
writeln(a, ' / ', b, ' = ', a / b)
else
writeln('делить на 0 нельзя');
end;
else
writeln('неизвестная операция');
end;
end.
//вторая программа
var
d: integer;
a: real;
begin
write('длина отрезка = '); readln(a);
write('введите код единицы измерения '); readln(d);
case d of
1: writeln('длина отрезка ', a / 10, ' метр(а, ов)');
2: writeln('длина отрезка ', a * 1000, ' метр(а, ов)');
3: writeln('длина отрезка ', a, ' метр(а, ов)');
4: writeln('длина отрезка ', a / 1000, ' метр(а, ов)');
5: writeln('длина отрезка ', a / 100, ' метр(а, ов)');
else
writeln('неизвестная единица длины');
end;
end.
{ 1 – дециметр, 2 – километр, 3 – метр, 4 – миллиметр, 5 – сантиметр.}var units: integer; value, factor: real; begin write('введите значение - '); readln(value); write('введите единицу измерения - '); readln(units); case units of 1: factor : = 0.1; 2: factor : = 1000; 3: factor : = 1; 4: factor : = 0.001; 5: factor : = 0.01; else factor : = 1; end; writeln(value * factor, ' м'); end.
Поделитесь своими знаниями, ответьте на вопрос:
Вначале значение переменной х равно 3. как изменится х после выполнения программы: х=5; х=-х; х=х+5
как я понимаю это си.
в си есть операторы сокращёного сложения, деления,вычитания,умножения
так что может быть имеется ввиду один из таких операторов
но тогда x=5; x-=5; x=x+5;
и тогда x=5;
если же всё записанно верно и х=5; х=-х; х=х+5 , то тогда x=0