FreePascal.ru

Ariman

Подскажите, пожалуйста, как удалить свой аккаунт на форуме?

Ariman

Объясните, пожалуйста, неразумному, как прочитать посимвольно, а не побайтно? И какой тип использовать. Ведь char в Free Pascal исключительно 1 байт. Для строки есть UTF8String, а для символа?

Ariman

Oleg_D писал(а):А в текстовый файл вывод направить пробовали?

Попробовал. Результат тот же.

Ariman

Есть код из ответов:
const { типизированные константы для русских букв }
HighChars: string = 'АБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ';
LowChars : string = 'абвгдеёжзийклмнопрстуфхцчшщъыьэюя';
function High(arg: char): char;
var i: integer;
begin
High:= arg;
if arg in ['a'&#46 ...

Ariman

Помогите, пожалуйста с решением такой задачи:
Дано вещественное число X и целое число N (> 0). Найти значение выражения X − X3/(3!) + X5/(5!) − … + (−1)N·X2·N+1/((2·N+1)!). Полученное число является приближенным значением функции sin в точке X.

Вот что я сам пытался наваять:

var X,F,R&#58 ...

Ariman

hinst писал(а):По принципу "что делаем? читаем переменные x, y, a. А если мы их читаем, то не всё ли равно, в каком порядке? мы же читаем одни и те же переменные"

Спасибо за понимание. Именно так я и думал...

Ariman

Подскажите в чем разница между этим

Код: Выделить всё

uses PT4Web;
var x,y,a : real;
begin
  Task('Begin33');
  Read(x,y,a);
  Write(a/x,a/x*y);
end.

и этим?

Код: Выделить всё

uses PT4Web;
var x,y,a : real;
begin
  Task('Begin33');
  Read(x,a,y);
  Write(a/x,a/x*y);
end.

Ariman

Лекс Айрин писал(а):а почему вычисление идет не по формуле, а напрямую?

По какой такой формуле? Поясните, пожалуйста. Я новичек еще.
P.S. Кстати, это код из книги с ответами.

Добавлено спустя 5 минут 7 секунд:

Дож писал(а):У меня правильный ответ

Извините, нашел у себя ошибку. Теперь все правильно.

Ariman

Напишите программу, вычисляющую сумму чисел от 1 до N , где N – число, вводимое пользователем.
var N : integer;
i, sum : integer;
begin
Write('Введите N '); Readln(N);
sum:=0;
for i:=1 to N do sum:= sum + i;
Write('С = ',sum); Readln;
end.
Почему с маленькими числами ...

FreePascal.ru

Найдено 9 результатов

Как удалить аакаунт?

Re: Глава 44, задачи б, в.

Re: Глава 44, задачи б, в.

Глава 44, задачи б, в.

Re: Задачник Абрамяна.

Re: Задачник Абрамяна.

Задачник Абрамяна.

Re: Глава 17, задача Е.

Глава 17, задача Е.