Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Паскаль
Регистрация

Восстановить пароль
Повторная активизация e-mail


Донат для форума - использовать для поднятия настроения себе и модераторам

А ещё здесь можно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 24.12.2008, 23:20   #1
felmor
Пользователь
 
Регистрация: 24.12.2008
Сообщений: 29
Репутация: 10
По умолчанию протабулировать функцию

очень надеюсь на вашу помощь
Изображения
Тип файла: jpg №2.jpg (19.6 Кб, 100 просмотров)
felmor вне форума   Ответить с цитированием
Старый 24.12.2008, 23:36   #2
Teor
Пользователь
 
Регистрация: 20.12.2008
Сообщений: 46
Репутация: 34

icq: 371669221
По умолчанию

Код:
program tab;
uses crt;
var x,y:real;
begin
clrscr;
x:=0;
write ('  x         y');
writeln;
repeat
x:=x+0.3;
if (x>=0) and (x<=4) then
y:=abs(x-2) else y:=2;
writeln (x:5:2,'    ',y:5:2);
until x>4.7;
readkey
end.
Teor вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Протабулировать функцию, помогите Sidsukana Помощь студентам 2 13.11.2008 15:19
добавить функцию, С xalex17 Помощь студентам 3 12.11.2008 04:39
решить функцию Waia Помощь студентам 1 02.11.2008 22:43
Помогите написать функцию Черничный Общие вопросы Delphi 4 13.08.2008 07:02
Подскажите функцию juden Microsoft Office Excel 1 06.12.2007 19:28


17:03.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.