Входной и выходной файлы

@123123FOR · Регистрация: 22.10.2018

Студворк — интернет-сервис помощи студентам

нужно сделать, чтобы переменная s бралась из файла и чтобы результат программы выводился в отдельный файл
имя входного файла - p.in,выходной файл - p.out

вот код:

Pascal

var
 s : real;
 c,b : longint;
begin  
  readln(s);
  if (s=0) then writeln(s);  
  
  if (s>=1) and (s<10) then writeln(s:0:1);
  
  c:=0;
  if (s>=10) then   
  begin
      while (s>=10) do
      begin
        s:=s/10;
        inc(c);
      end;
    writeln(s:0:1,'*10^',c);
  end;
  
  b:=0;
  if (s>0) and (s<1) then
    begin
      while (s<1) do
        begin
          s:=s*10;
          inc(b);
        end;
      writeln(s:0:1,'*10^',b);
    end;
    
  end.

программа выводить числа в виде a*10^n
извините, если что-то не понятно объяснил

@Sun Serega · 22.10.2018, 22:38

Просто поставьте в начале программы это:

Pascal

1 2	Reset(input,'p.in'); Rewrite(output,'p.out');

input и output это стандартные переменные, обычно они не привязаны к файлам. В таком случае ввод/вывод работают с консоли. Но эти 2 строчки откроют (а для вывода ещё пересоздаст) соответствующие файлы. Тогда Readln и Writeln будут читать/записывать в указанные файлы. Я компилировал в уме, поэтому, если что - исправьте по смыслу.

@JuriiMW · 23.10.2018, 05:16

Во-первых, неизвестно условие задачи.
Ну да ладно!
Ввожу число -123… Она тупо завершается и ни чего не говорит ;–(
Ввожу 1e-8… А она мне — 1.0*10^8
Ввожу 100… А она мне — 1.0*10^2

Ни чё не понимаю!

Чёрный ящик какой-то…

@JuriiMW 5059 / 2633 / 2346 Регистрация: 10.12.2014 Сообщений: 9,997
	23.10.2018, 05:16	3
	Во-первых, неизвестно условие задачи. Ну да ладно! Ввожу число -123… Она тупо завершается и ни чего не говорит ;–( Ввожу 1e-8… А она мне — 1.010^8 Ввожу 100… А она мне — 1.010^2 Ни чё не понимаю! Чёрный ящик какой-то… 0

Опции темы

Входной и выходной файлы

Решение