Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Pascal ABC Числа. Наличие цифр 3.Дано натуральное число. Определить: а) есть ли в нем цифра 3; б) есть ли в нем цифры 2 и 5. https://www.cyberforum.ru/ pascalabc/ thread758056.html Последовательности чисел. Вывод, поиск Pascal ABC
2.Даны последовательность вещественных чисел av a2, ..., а15, упорядоченная по возрастанию, и число п, не равное ни одному из чисел последовательности и такое, что аг< п < а16. а) Вывести все числа последовательности, меньшие п. б) Найти два элемента последовательности (их порядковые номера и значение), в интервале между которыми находится значение п. В обеих задачах условный оператор не...
Pascal ABC Циклы. Вывод специальным образом 1.Имеется фрагмент программы в виде оператора цикла с параметром, обеспечивающий вывод на экран «столбиком» квадратных корней из всех целых чисел от а до Ъ (а > Ъ). Оформить этот фрагмент в виде: а) оператора цикла с предусловием; б) оператора цикла с постусловием. Всем буду очень благодаренПравила форума п. 5.16: Запрещено создавать темы с множеством вопросов во всех разделах, кроме... https://www.cyberforum.ru/ pascalabc/ thread758034.html Pascal ABC Вычислить значение данной формулы В текстовом файле записана без ошибок формула вида: цифра или R(формула, формула), или L(формула, формула), где R обозначает функцию взять правое число, L – левое число. Вычислить значение данной формулы. Например: R(8, R(3, L(4,5))) = 4). #include <assert.h> #include <stdlib.h> #include <stdio.h> typedef int value_type; typedef struct node_tag { struct node_tag *next; https://www.cyberforum.ru/ pascalabc/ thread758020.html
Pascal ABC Напишите программу что бы получилось ночное небо с мерцающими звездами
Напишите пожалуйста программу что бы получилось ночное небо с мерцающими звездами, самыми простыми по возможности командами!! :))
Pascal ABC Вывести на печать характеристики планет, расположенных в порядке невозрастания количества спутников Помогите пожалуйста написать программу на языке паскаль. На основе таблицы, включающей название планеты, расстояние от Солнца, период обращения, количество спутников, средний радиус, массу, вывести на печать: Характеристики планет, расположенных в порядке невозрастания количества спутников(массы, радиуса обращения). P.S. Не знаю совершенно как написать в программе конкретно эту часть --->... https://www.cyberforum.ru/ pascalabc/ thread757960.html
Pascal ABC Найти сумму положительных элементов трех массивов разного размера Даны три одномерных массива чисел a , b , c Найти общую сумму положительных элементов в массивах. Нахождение суммы элементов в массиве оформить функцией. На данный момент что я сделал : Я ввел три массива одинакового размера. Нахожу в каждом положительные элементы и нахожу сумму положительных элементов трех массивов, но не знаю как мне быть с разным размером. :( Как в такой ситуации быть?... https://www.cyberforum.ru/ pascalabc/ thread757952.html Динамические структуры Pascal ABC
Друзья.. подскажите пожалуйста как сделать разбитие динамичесокй структуры на два файла? т.е. есть файл в котором хранятся сведения о товаре (название, производитель количество, цена день поступления месяц и год) так вот вопрос в слудующем: как в 1-й файл записать сведения о товаре который храниться более одного месяца и стоимость которого более 100 руб, а во второй сведения о товаре которые...
Pascal ABC строго по алгоритму (скриншот блок-схемы) написать программу с разными циклами Виталий, еще раз повторяю. ВСЕ ВАРИАНТЫ программы должны ПОЛНОСТЬЮ соответствовать алгоритму. Посмотрите, какие переменные в алгоритме? Какие в программе? Какое условие у вас написано в алгоритме? Какое в решении ? Что за условия-условия-условия в решениях задачи? Никаких условий (кроме одного, которое отвечает за цикл) в алгоритме нет – значит их не должно быть в программе. Еще раз повторяю ВСЕ... https://www.cyberforum.ru/ pascalabc/ thread757884.html Pascal ABC Вычислить сумму ряда https://www.cyberforum.ru/ pascalabc/ thread757875.html
Пожалуйста, помогите, Нужно вычислить сумму ряда и создать 2 разные программы с использованием разных типов циклов (Один типа FOR, второй WHILE или REPEAT-UNTIL) http://s019.***********/i621/1301/d2/958af47ef7ba.jpg http://s020.***********/i714/1301/e6/f35960daf35c.jpg Вывести результат в таком виде: Внутренняя сумма=............ Внешняя сумма 1=............. Спасибо :)
Pascal ABC Вставить в файле после каждой буквы заданного слова букву "о"
Вставить в файле после каждой буквы заданного слова букву "о"
Pascal ABC Строки(обработка текста)заменить последовательность 'подин' на 'подын' https://www.cyberforum.ru/ pascalabc/ thread757789.html
Помогите решить задачу! В заданном тексте,заданном более чем одной одной строкой,все последовательности 'подин' заменить на 'подын' Добавлено через 37 минут var s,s_old,s_new: string; i,l_old: byte; f : text; begin assign(f,'C:/с.txt');
Лучи добра
173 / 171 / 191
Регистрация: 08.06.2012
Сообщений: 292
11.01.2013, 02:28 0

Выяснить, есть ли модель авто, мощность двигателя которой превышает 200 лс - Pascal ABC - Ответ 3983263

11.01.2013, 02:28. Показов 8732. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

^_^
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
uses crt;
var a,i,f:integer;
begin
     f:=0;
     writeln('Ввод данных:');
     for i:=1 to 30 do
         begin
              readln(a);
              if a>200 then
                 f:=1;
         end;
     if f=1 then
        writeln('Среди 30 моделей есть двигатель с мощностью >200 л.с.')
     else
         writeln('Среди 30 моделей нет двигателей с мощностью >200 л.с.');
end;


Вернуться к обсуждению:
Выяснить, есть ли модель авто, мощность двигателя которой превышает 200 лс Pascal ABC
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.01.2013, 02:28
Готовые ответы и решения:

Напечатать стоимость каждого из автомобилей, в которых мощность двигателя не превышает 80 л.с.
Известны данные о мощности двигателя (в л.с.) и стоимости 30-ти маркам легковых автомобилей....

Напечатать стоимость каждого из автомобилей,у которых мощность двигателя не превышает 80 л.с
Известны данные о мощности двигателя (в л.с.) и стоимость 30-ти марок легковых...

Напечатать стоимость каждого из автомобилей, у которых мощность двигателя не превышает 80 л.с
5. Известны данные о мощности двигателя (в л. с.) и стоимости 30-ти марок легковых автомобилей....

Напечатать стоимость каждого из автомобилей, у которых мощность двигателя не превышает 80 л. с
Известны данные о мощности двигателя (в л. с.) и стоимости 30-ти марок легковых автомобилей....

1
11.01.2013, 02:28
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
11.01.2013, 02:28
Помогаю со студенческими работами здесь

Определить общую стоимость автомобилей, мощность двигателя которых превышает 100 л.с.
Пробовал решать,постоянно выводит не правильно)

Определить общую стоимость автомобилей, у которых мощность двигателя превышает 100 л.с
Известны данные о мощности двигателя (в л. с.) и стоимости 30 легковых автомобилей. Определить...

Определить общую стоимость автомобилей, у которых мощность двигателя превышает 100 л.с
Известны данные о мощности двигателя ( л.с.) и стоимости 30 легковых автомобилей. Определить общую...

Массивы. Напечатать стоимость каждого из автомобилей, у которых мощность двигателя не превышает 80 л.с.
Известны данные о мощности двигателя (в л.с.) и стоимости 30-ти марок легковых автомобилей....

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru