сервис вопросов и ответовДано положительное число A.Найдите среди чисел 1,1+1/2,1+1/3..........первое,большее A..ПОМОГИТЕ ПОЖАЛУЙСТА НАПИСАТЬ ПРОГРАММУ В ПАСКАЛЬ
10-11 класс|
|
Mamaegik
12 апр. 2016 г., 2:23:58 (8 лет назад)
Kocharyanalla
12 апр. 2016 г., 4:12:55 (8 лет назад)
var
A, S:real;
i:integer;
begin
write('A = '); readln(A);
if A < 1 then
begin
writeln('1 > ', A);
exit;
end;
if A < 1.5 then
writeln('1.5 > ', A)
else
writeln('Таких чисел нет');
readln;
end.
Ответить
Другие вопросы из категории
Напишите программу, которая выводит на экран массив случайных двузначных чисел а[1..10,1..20] и находит количество отрицательных элементов в этом массиве.
Пожалуйста решите задачу путем программирования, и буду благодарен если меня тоже научите алгоритму решения!!!
привет всем
помогите пожалуйста с информатикой а точнее с Excel
задания ниже
Читайте также
1. Дано n чисел. Найти колличество тех, которые делятся на 5, и не делятся на 7.
2. Найти квадраты всех отрицательных чисел среди N заданных.
3. Найти количество чисел, среди N введенных,которые имеют нечетные порядковые номера, а сами являются четными числам.
4. напишите программу для вычисления суммы:
- 1*1!+2*2!+3*3!+....+n*n!
- 1*3+3*5+5*7+...n(n+2)
- 1+11+111+...+111+1-n слагаемых.
Помогите, пожалуйста написать программы для паскаля, очень нужно. Заранее спасибо.
Помогите надо написать программу в паскале. 1)координаты двух различных полей шахматной доски x1, y1,x2, y2 (целые числа, лежащие в диапазоне 1–8).
Проверить истинность высказывания: «Ладья за один ход может перейти с одного поля на другое». 2) Дано трехзначное число. Проверить истинность высказывания: «Все цифры данного числа различны». 3)Даны две переменные целого типа: A и B. Если их значения не равны, то присвоить каждой переменной сумму этих значений, а если равны, то присвоить переменным нулевые значения. Вывести новые значения переменных A и B.
Помогите,пожалуйста,написать программу в паскале к задаче. Даны три целых числа:A,B,C.Проверить истинность высказывания:"Число B находится между
числами A и C".
Помогите пожалуйста написать программу на паскале: дан массив целых чисел. найти количество элементов,кратных 5, расположенных между максимальным и
минимальным элементами массива (включая их)
Вы находитесь на странице вопроса "Дано положительное число A.Найдите среди чисел 1,1+1/2,1+1/3..........первое,большее A..ПОМОГИТЕ ПОЖАЛУЙСТА НАПИСАТЬ ПРОГРАММУ В ПАСКАЛЬ", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.