|
1. Напишите программу, которая считывает с клавиатуры два вещественных числа, находит их сумму и выводит результат на экран.
2. Напишите программу, которая считывает с клавиатуры два вещественных числа, находит их разность и выводит результат на экран.
3. Напишите программу, которая считывает с клавиатуры два вещественных числа, находит их произведение и выводит результат на экран.
4. Что произойдет, если в программе program Primer_4, в качестве типа переменных выбрать вещественный тип:
var
Chislo1,Chislo2,Resultat:real;
А в процедуре work попытаемся определить остаток от деления первого числа на второе:
procedure Work;
begin
resultat:=chislo1 mod chislo2;
end;
Попробуйте объяснить данный результат.
Достарыңызбен бөлісу: |
