помогите пожалуйста! даны числа a,b найти только отрицательные
5-9 класс
|
var a,b :integer;
begin
readln(a,b);
if a<0 then writeln(a, 'Отрицательный');
if b<0 then write(b, 'Отрицательный');
end.
Другие вопросы из категории
1)Англ.языка
2)Испанского яз.
3)Арабского яз.
4)Китайского яз.
изображения составляет 120 х 300 точек. Определите информационный
объем этого документа.
их в массив и вычислить их моду.
ользовать условную инструкцию if и циклы.
Читайте также
2. Дан массив целых чисел,найти количество отрицательных элементов массива.
3. Дан массив целых чисел,найти количество чётных чисел в массиве.
3) Даны числа от 1 до n. Найти сумму чисел кратных 5, но не кратных 7.
Помогите пожалуйста!!!)))))
Даны натуральное число n и вещественные числа a1, a2, ..., an. Определить среднее арифметическое вещественных чисел...
ПАСКАЛЬ,ПОМОГИТЕ ПОЖАЛУЙСТА
превосходящие N, в порядке возрастания.
Операцией возведения в степень пользоваться нельзя!
2)
В первый день спортсмен пробежал x километров, а затем он каждый день увеличивал пробег на 10% от предыдущего значения. По данному числу y определите номер дня, на который пробег спортсмена составит не менее y километров.
Программа получает на вход действительные числа x и y и должна вывести одно натуральное число.