Отправляет email-рассылки с помощью сервиса Sendsay

RFpro.ru: Консультации по информатике

Подписаться Бесплатная «Серебряная» новостная рассылка . Подписчиков 293 RSS
←   Октябрь 2013   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31


За последние 60 дней ни разу не выходила


Сайт рассылки: http://rusfaq.ru/issues/8/19/228
Открыта: 17-04-2009

Автор
Калашников О.А.

Статистика

293 подписчиков
0 за неделю
←   Все выпуски   →

RFpro.ru: Консультации по информатике


Хостинг портала RFpro.ru:
Московский хостер
Профессиональный ХОСТИНГ на базе Linux x64 и Windows x64

РАССЫЛКИ ПОРТАЛА RFPRO.RU

Лучшие эксперты по данной тематике

Асмик Гаряка
Статус: Советник
Рейтинг: 10653
∙ повысить рейтинг » 		Роман Селиверстов
Статус: Советник
Рейтинг: 5083
∙ повысить рейтинг » 		Коцюрбенко Алексей aka Жерар
Статус: Советник
Рейтинг: 3992
∙ повысить рейтинг »

/ НАУКА И ОБРАЗОВАНИЕ / Точные и естественные науки / Информатика

Номер выпуска:271
Дата выхода:02.10.2013, 16:00
Администратор рассылки:Андреенков Владимир (Профессор)
Подписчиков / экспертов:42 / 53
Вопросов / ответов:3 / 3

Консультация # 83745: Ради интереса написал следующее: program www; type TTREm=record name:integer; end; var fl:file of TTREm; fff:TTREm; begin {$I-}reset(fl); read(fl,fff);close(fl);{$I+} readln; end. на readln; пишет file not open, что это значит?...

Консультация # 121169: решите на паскале. найти те двузначные числа, у которых сумма квадратов цифр дает это же число...
Консультация # 186844: Здравствуйте, уважаемые эксперты! Прошу вас ответить на следующий вопрос: Задача 11 - http://rfpro.ru/upload/8818...

Консультация # 83745:

Ради интереса написал следующее:
program www;
type
TTREm=record
name:integer;
end;
var
fl:file of TTREm;
fff:TTREm;
begin
{$I-}reset(fl); read(fl,fff);close(fl);{$I+}
readln;
end.

на readln; пишет file not open, что это значит?

Дата отправки: 22.04.2007, 21:41
Вопрос задал: Tribak (Студент)
Всего ответов: 1
Страница онлайн-консультации »

Консультирует Gh0stik (Академик):

Здравствуйте, Tribak!

Вы просто не связались с файлом, нужно например так:
program www;
type
TTREm=record
name:integer;
end;
var
fl:file of TTREm;
fff:TTREm;
begin
assign(fl,\'dat.dat\');
reset(fl);
if filesize(fl)<>0 then begin {проверяем пустой ли файл}
read(fl,fff);
end;
close(fl);
readln;
end.


Good Luck!!!

Консультировал: Gh0stik (Академик)
Дата отправки: 22.04.2007, 21:54
Рейтинг ответа:

НЕ одобряю 0 одобряю!

Консультация # 121169:

решите на паскале. найти те двузначные числа, у которых сумма квадратов цифр дает это же число

Дата отправки: 01.02.2008, 12:16
Вопрос задал: А.Н. Сахаров
Всего ответов: 1
Страница онлайн-консультации »

Консультирует Tribak (Студент):

Здравствуйте, А.Н. Сахаров!
program www;
var
a,b,i:integer;
begin
for i:=1 to 99 do
begin
a:=i div 10;
b:=i mod 10;
if (a*a+b*b)=(i*i) then writeln(i);
end;
readln;
end.

Консультировал: Tribak (Студент)
Дата отправки: 01.02.2008, 12:25
Рейтинг ответа:

НЕ одобряю 0 одобряю!

Консультация # 186844:

Здравствуйте, уважаемые эксперты! Прошу вас ответить на следующий вопрос:

Задача 11 - http://rfpro.ru/upload/8818

Дата отправки: 19.11.2012, 11:24
Вопрос задал: Aleksandrkib (Посетитель)
Всего ответов: 1
Страница онлайн-консультации »

Консультирует Зенченко Константин Николаевич (Модератор):

Здравствуйте, Aleksandrkib!

Предложенный алгоритм считает количество совпадений элементов в двух разноразмерных массивах.
алгоритм с ошибкой, строка: C:=1- должен быть нуль

Математический эквивалент алгоритма, это пересечение множеств.
В языках программироавания, множества представляются ввиде массивов постоянной длины, компилятор во время обработки кода формируем матрицу множества: "none"=0x0000, "value1"=0х0001 и т.д., после компиляции всего кода в нужных местах подставляет нужный индекс, который является числом ввиде: 0х00 или 0Х0000(зависит от количества элементов множества)

Удачи!

Консультировал: Зенченко Константин Николаевич (Модератор)
Дата отправки: 24.11.2012, 20:53
Рейтинг ответа:

НЕ одобряю 0 одобряю!

Оценить выпуск | Задать вопрос экспертам

главная страница  |  стать участником  |  получить консультацию
техническая поддержка  |  восстановить логин/пароль

Дорогой читатель!
Команда портала RFPRO.RU благодарит Вас за то, что Вы пользуетесь нашими услугами. Вы только что прочли очередной выпуск рассылки. Мы старались. Пожалуйста, оцените его. Если совет помог Вам, если Вам понравился ответ, Вы можете поблагодарить автора - для этого в каждом ответе есть специальные ссылки. Вы можете оставить отзыв о работе портале. Нам очень важно знать Ваше мнение. Вы можете поближе познакомиться с жизнью портала, посетив наш форум, почитав журнал, который издают наши эксперты. Если у Вас есть желание помочь людям, поделиться своими знаниями, Вы можете зарегистрироваться экспертом. Заходите - у нас интересно!
МЫ РАБОТАЕМ ДЛЯ ВАС!

© 2001-2012, Портал RFPRO.RU, Россия
Авторское право: ООО "Мастер-Эксперт Про"
Калашников О.А. | Гладенюк А.Г.
Хостинг: Компания "Московский хостер"
Версия системы: 2011.6.36 от 26.01.2012
В избранное