Работа с файлами. Взять из файла “1.txt” целое число и поместить в файл “11.txt” значение этого числа в степени 5.
написать код на паскале очень надо
прям

pomoch5 pomoch5    3   30.05.2020 18:51    1

Ответы
7Настася7 7Настася7  14.09.2020 22:59

program na;

var a: Text; c:string; b:real;

begin

assign(a,'C:1.txt');

reset(a);

read(a,c);

close(a);

assign(a,'C:11.txt');

rewrite(a);

b:=StrToInt(c)**5;

write(a,b);

close(a)

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика