Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

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

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

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 20.05.2012, 16:29   #1
pahantut
 
Регистрация: 19.05.2012
Сообщений: 5
Восклицание Написать программу

Вот задание . Помогите пожалуйста.

Последний раз редактировалось pahantut; 20.05.2012 в 16:34.
pahantut вне форума
Старый 20.05.2012, 17:02   #2
eoln
Старожил
 
Аватар для eoln
 
Регистрация: 26.04.2008
Сообщений: 2,689
По умолчанию

var a, b, x, y: real;//объявление переменных
readln(a, b, x);//ввод данных
if x<=10 then //условие
sqr(x)//квадрат числа
sqrt(10)//квадратный корень из числа
write(y);//вывод
eoln вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Написать программу. Salabasama Помощь студентам 2 31.03.2012 10:29
Написать программу для перевода из 16-ричной системы счисления в 10-тичную, использовать процедурую(написать Delphi) BLADIMIR Помощь студентам 3 07.09.2011 16:35
Написать программу Chuvak Общие вопросы C/C++ 3 25.03.2009 22:51