ПОМОГИТЕ ПОЖАЛУЙСТА!!!! Составить программу ** TURBO PASCAL для вычисления суммы,...

0 голосов
59 просмотров

ПОМОГИТЕ ПОЖАЛУЙСТА!!!! Составить программу на TURBO PASCAL для вычисления суммы, разности, произведения частного двух действительных чисел x, y!


Информатика (84 баллов) | 59 просмотров
Дан 1 ответ
0 голосов

Program Zadacha;
var
    x, y: real;
Begin
    Write('Enter x, y ');
    ReadLn(x, y);
    
    WriteLn(x, ' + ', y, ' = ', x+y);
    WriteLn(x, ' - ', y, ' = ', x-y);
    WriteLn(x, ' * ', y, ' = ', x*y);
    WriteLn(x, ' / ', y, ' = ', x/y);
            
    ReadLn;
End.

(333 баллов)