Информатика

ON-Line курс по ИКТ для поступающих в Вуз

Бертик Алла Абрамовна, преп. в.к.к. ИСР НГТУ

СЛОВАРЬ ТЕРМИНОВ

Материалы для изучения

ЗАДАЧИ

В качестве примера: РЕШЕНИЕ ЗАДАЧИ №4

Задача:

Написать программу, в которой вводятся два операнда Х и Y и знак операции (+, –, /, *). Вычислить результат Z в зависимости от знака. Предусмотреть реакции на возможный неверный знак операции, а также на ввод Y=0 при делении. Организовать возможность многократных вычислений без перезагрузки программа (т.е. построить цикл). В качестве символа прекращения вычислений принять ‘0’.

Алгоритм решения задачи:

Вводим знак. Если он является символом '0', то прерываем цикл.

Если введенный символ принадлежит к перечисленным, то запрашиваем два числа и выполняем вычисления в зависимости от введенного знака.

Иначе сообщаем о некорректном вводе знака.

Программа на языке Паскаль:

var

x,y,z: real;

operation: char;

begin

while True do begin

write('operation: '); readln(operation);

if operation = '0' then break;

if operation in ['+','-','*','/'] then begin

write('x='); readln(x);

write('y='); readln(y);

case operation of

'+': begin z := x + y; writeln(z:5:2) end;

'-': begin z := x - y; writeln(z:5:2); end;

'*': begin z := x * y; writeln(z:5:2); end;

'/': if y <> 0 then begin

z := x / y;

writeln(z:5:2)

end

else

writeln('Division by zero!');

end;

end

else writeln('Bad operation!')

end;

end.

29.04.2014. 22:13