Информатика | 5 - 9 классы
Написать программу на языке Паскаль.
Даны три действительные числа.
Сложить те из них, значения которых не отрицательны.
33. Даны три действительных числа?
33. Даны три действительных числа.
Возвести в квадрат те из них, значения которых неотрицательны, и в четвертую степень — отрицательные.
Написать в VBA и Дельфе.
Даны два действительных числа x и y?
Даны два действительных числа x и y.
Вычислить их сумму, разность, произведение и частное.
Напишите программу в паскаль.
Дано трехзначное число?
Дано трехзначное число.
Найти сумму цифр числа.
(Написать программу на языке Паскаль).
Даны три действительных числа?
Даны три действительных числа.
Возвести в квадрат те из них, значения которых неотрицательны, и в четвертую степень - отрицательные.
Писать нужно на паскале.
Даны целые числа a, b и с?
Даны целые числа a, b и с.
Написать программу подсчитывающую кол - во положительных и кол - во отрицательных чисел среди данных.
Входные данные - 2 4 - 1 выходные 2 1.
(язык программирования Паскаль АБС).
Помогите пожалуйста?
Помогите пожалуйста!
СРОЧНО!
Даны три действительных числа.
Возвести в квадрат те из них, значения которых неотрицательны, и в четвёртую степень – отрицательные.
Нужно написать для Basic!
Даны 3 числа?
Даны 3 числа.
Возведите в квадрат те из них значения которых отрицательны.
(записать программу на языке паскаль).
Даны целые числа a и b написать программу которая выводит сначала меньшее число затем большее( на языке паскаль)?
Даны целые числа a и b написать программу которая выводит сначала меньшее число затем большее( на языке паскаль).
Написать программу на языке паскаль Определить является ли число четным или нечетным?
Написать программу на языке паскаль Определить является ли число четным или нечетным.
Помогите написать программу на языке паскаль?
Помогите написать программу на языке паскаль.
Вы находитесь на странице вопроса Написать программу на языке Паскаль? из категории Информатика. Уровень сложности вопроса рассчитан на учащихся 5 - 9 классов. На странице можно узнать правильный ответ, сверить его со своим вариантом и обсудить возможные версии с другими пользователями сайта посредством обратной связи. Если ответ вызывает сомнения или покажется вам неполным, для проверки найдите ответы на аналогичные вопросы по теме в этой же категории, или создайте новый вопрос, используя ключевые слова: введите вопрос в поисковую строку, нажав кнопку в верхней части страницы.
Program chislo ;
var a, b, c, d : integer ;
begin
write('Введите a = ' ) ;
readln(a) ;
if a> ; = 0 then d : = d + a ;
write('Введите b = ' ) ;
readln(b) ;
if b> ; = 0 then d : = d + b ;
write('Введите c = ' ) ;
readln(c) ;
if c> ; = 0 then d : = d + c ;
writeln(d) ;
write('Сумма положительных чисел равна ', d)
end.