Question

Составить программу на pascal и блок схему
Дано натуральное число n. Вычислить n

Answer 1

var
    num: word;
begin
    read(num);
    write(num);
end.
__________________________

Все вроде как по заданию