Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal Найти кратные Найти все трехзначные числа, которые кратны 2 и 4 https://www.cyberforum.ru/ pascal/ thread170696.html	Pascal Программа, проверяющая текст на орфогр. ошибки Написать программу, которая будет проверять текст на орфографические ошибки. курсяк готовлю :D помогите, пожалуйста заранее спасибо! :)
Pascal Умножение массивов https://www.cyberforum.ru/ pascal/ thread170689.html Напишите программу которая запрашивает и вводит с экрана два линейных массива действительных чисел не более 50( возможно разное количество членов) получает из них третий длинна которого равна длине большего из введенных массивов а каждый член равен произведению соответственных членов введенных массивов. Элементы более длинного массива, для которых нет соответствующих в более коротком, входят в...	Pascal Нарисовать параболу точками Объясните пожалуйста.Вот организовал такой цикл: l:=1; for i:=1 to 120 do begin putpixel(120+l,round(650/-l)+300),4); l:=l+2; end; Как его переделать чтобы нарисовать параболу точками. https://www.cyberforum.ru/ pascal/ thread170670.html
определения продолжительности месяца в году Pascal Доброго время суток ! Помогите ришить задачку Составить функцию определения продолжительности месяца в году Y.	Pascal Диаметр числового множества Помогите пожалуйста написать програму . Диаметром числового множества называется величина d(A)=max(x,y) : x,y є А опедилить фунуцию вічисления диаметра d(A) . https://www.cyberforum.ru/ pascal/ thread170662.html
Pascal Дополнение множества Доброго врямя суток . Помогите пожалуйста решить задачу . Опредедить функцию дополнения множества . https://www.cyberforum.ru/ pascal/ thread170660.html	Pascal Вычислить среднее арифметическое значение Помогите, пожалуйста. Задача: Дан файл, а в нем числа. Количество этих чисел может менятся. Например, один раз внесли в этот файл 120 значений, а в другой раз 1000. Необходимо взять числа из этого файла, посчитать среднее арифметическое и записать результат в другой файл. Заранее благодарю.
Pascal Вывести получившиеся массив и сумму модулей всех элементов массива https://www.cyberforum.ru/ pascal/ thread170645.html 1)Запросить и ввести количество членов линейного массива (не более 50) ,затем сам массив действительных чисел . Вывести получившиеся массив и сумму модулей всех элементов массива 2)Запросить и ввести количество членов линейного массива (не более 50) ,затем сам массив действительных чисел . Вывести получившиеся массив и сумму всех положительных элементов	Pascal Нахождение значения минимального отклонения Даны три числа a,b,c. Составить программу нахождения значения минимального отклонения каждого из них от их среднего арифмитического. Данные выбрать произвольно. ЗАРАНЕЕ ОГРОМНОЕ СПАСИБО :) https://www.cyberforum.ru/ pascal/ thread170644.html
Pascal Дан одномерный массив, найти количество элементов, которые делятся на 3 без остатка Дан одномерный массив, найти количество элементов, которые делятся на 3 без остатка вывести все отрицательные	Pascal сумма все положительных элементов в массиве https://www.cyberforum.ru/ pascal/ thread170613.html Пожалуйста помогите. Нужна програма сумма все положительныхэлементов в массиве не более 50 элементов

andrei63

141 / 135 / 69

Регистрация: 15.12.2009

Сообщений: 343

29.09.2010, 23:24

Условный оператор - Pascal - Ответ 993048

29.09.2010, 23:24. Показов 1166. Ответов 1

Метки (Все метки)

Сообщение было отмечено Blake_102 как решение

Решение

Pascal

var a,b,c:integer;
begin
writeln('введите 1-е число');
readln(a);
writeln('введите 2-е число');
readln(b);
if a>b then c:=sqr(a)
else c:=sqr(b);
write(c);
end.

Вернуться к обсуждению:
Условный оператор Pascal

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

29.09.2010, 23:24

Готовые ответы и решения:

Условный оператор и оператор множественного выбора
Много заданий написал, но я уверен, что решить их не составит вам труда (не то что мне), хоть...

Условный оператор. Оператор выбора
Помогите пожалуйста с задачей, то я в поскале чайник)! Определить , пересекает ли парабола y=ax +...

Условный оператор
http://keep4u.ru/imgs/b/2010/03/26/4f/4fecd4f8bb330d81b0e7749fcc7b008f.png Добавлено через 15...

Условный оператор
http://keep4u.ru/imgs/b/2010/03/26/dc/dcb6766ec0b02007012b035f48dc2b95.png

	29.09.2010, 23:24

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

29.09.2010, 23:24

Помогаю со студенческими работами здесь

Условный оператор
Напишите пожалуйста програмный код к заданию:используя не более 2х сравнений определить номер...

Условный оператор
В зависимости от введенного признака вычислить общее сопротивле- ние электрической цепи. При k = 1...

Условный оператор
Заданы площади круга R и квадрата S. Определить, поместится ли квадрат в круге. Задачу решить...

Условный оператор
Не могу решить задания....Помогите....зарание спасибо!!!

Наверх