сервис вопросов и ответовзадать с клавиатуры 10 чисел напечатеть те из них которые больше 50
10-11 класс|
|
Toshik09
06 марта 2015 г., 5:40:04 (9 лет назад)
Елена1245
06 марта 2015 г., 7:14:49 (9 лет назад)
var
a : array [1..10] of real;
i : byte;
begin
for i := 1 to 10 do read (a[i]);
for i := 1 to 10 do
if a[i] > 50 then write (a[i], ' ');
end.
Ответить
Другие вопросы из категории
Записать на языке «Паскаль»
программу, реализующую алгоритм работы кассира, выдающего покупателю сдачу
сумма «S» наименьшим кол-вом банкнот по 1000 , 500, 100, 50, 10 рублей.
Срочно, помогите!
Дан двумерный массив целых чисел, i=10, j=15; заполняется случайными образом целыми числами от 0 до 100. Определите сколько раз в нём случается элемент со
значением Х (Х-задаётся пользователем).
С клавиатуры вводятся два числа x и y.
Найти разновидность z между большим и меньшим из них
Читайте также
Язык "Паскаль АВС" 1.Среди двухзначных чисел найти количество четных чисел. 2. Среди двухзначных чисел найдите те числа, у которых первая цифра четная.
3. Среди двухзначных чисел найдите те числа, которые кратны 3 и 4. 4. Среди трехзначных чисел найдите те, у которых все цифры равны. 5. Найдите среди трехзначных чисел симметричные числа. 6. Найдите среди четырехзначных чисел симметричные числа. 7. Найдите все трехзначные числа такие, что сумма цифр равна А, а само число делится на В. А и В вводятся с клавиатуры. 8. Найдите все трехзначные числа такие, которые при увеличении на 1 делятся на 2, при увеличении на 2 делятся на 3, при увеличении на 3 делятся на 4, при увеличении на 4 делятся на 5. 9. Найдите количество трехзначных чисел, сумма цифр которых равна А, а само число заканчивается на В, А и В вводятся с клавиатуры. 10. Найдите все трехзначные числа, у которых сумма крайних цифр равна сумме средних цифр, а само число делится на 6 и 27. 11.Найдите все трехзначные числа, которые при делении на 2 дают остаток 1, при делении на 3-остаток 2, при делении на 4-остаток 3, само число делится на5. 12. Найдите все четырехзначные числа, в которых есть две одинаковые цифры. 13. Найдите сумму всех чисел из промежутка от А до В, кратных 13 и 5, А и В вводятся с клавиатуры. 14. Найдите все симметричные четырехзначные числа. 15.Найдите все трехзначные числа, которые состоят из различных цифр, а их сумма равна А.
С клавиатуры введите три числа a,b,c введите те из них которые делятся на 2.
Написать надо по паскалю
Вы находитесь на странице вопроса "задать с клавиатуры 10 чисел напечатеть те из них которые больше 50", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.