Var N,S,a0, i: integer;
begin;
N:=0;
S:=0;
read(N);
read(S);
a0:= S div N - N + 1;
write(a0);
for i:=1 to N-1 do
begin
write(' ', a0 + 2*i);
end;
end.
Ответ: Объяснение:
простой пример: создать файл с именем cmd.cmd, написать в нем следующие команды:
---------------
@echo off
echo @echo off
echo pause
-----------------
сохранить, затем запустить из командной строки:
cmd.cmd > cmd2.cmd
всё что выводилось на экран будет выводиться в файл с именем cmd2.cmd
файлы можно называть как вам нравится важен знак ">" - перенаправления вывода и в начале "@echo off
" для отключения лишнего вывода
<span>Заголовки столбцов обозначаются буквами или сочетаниями букв (А, С, АВ и т. п.), заголовки строк — числами (1, 2, 3 и далее).</span>
Var a,b,c:real;
begin
read (a,b,c);
if (a<>b) and (a<>c) and (b<>c) then writeln ('НЕТ') else
if (a=b) and (a=c) and (b=c) then writeln ('ВСЕ РАВНЫ') else
writeln ('ДА');
end.