Есть ответ 👍

Составить программу, которая вычисляет дробную часть вещественного числа x, введенного с клавиатуры.

260
497
Посмотреть ответы 2

Ответы на вопрос:


var x,c: real;

begin

read(x);

c: =frac(c);

writeln(c: 1: 6);

readkey;

end. 

 


Var       c, y, a, h, s: real; begin       a : = 2.0;       h : = 1.0;       c : = -1.57;             repeat               y : = c - a;               writeln(c: 7: 2, ' ', y: 7: 2);               s : = s + y;               c : = c + h;       until c > 1.57;             writeln(s); end.

Популярно: Информатика