сервис вопросов и ответовПомогите пожалуйста!! Задача по паскалю!
5-9 класс|
|
введите три числа a, b, с. определите количество положительных чисел в данном наборе
Nastye1704
11 февр. 2014 г., 17:34:53 (10 лет назад)
Lici8888
11 февр. 2014 г., 19:44:04 (10 лет назад)
var
a, b, c: real;
n: integer;
begin
Write('Введите через пробел три числа: ');
Readln(a, b, c);
if a > 0 then n := 1 else n := 0;
if b > 0 then n := n + 1;
if c > 0 then n := n + 1;
Writeln('Положительных чисел- ', n)
end.
Тестовое решение:
Введите через пробел три числа: -3.54 2.16 4
Положительных чисел- 2
Ответить
Другие вопросы из категории
Для хранения растрового изображения
размером 64 × 128 пикселей отвели 8 Кбайт памяти. Какое
максимально возможное число цветов в палитре изображения?
Помогите,пожалуйста. По номеру дня недели вывести его название. Например, если а=1 то вывод «Понедельник». Начертить блок-схему к задаче в
тетради. Написать программу к задаче в тетради.
Читайте также
пожалуйста, помогите решить задачи по Паскалю!!!
1) Даны два числа. Составить алгоритм и перевести его на язык программирования, который меньшее из них возводит в квадрат, а большее оставляет без изменения,
ПОМОГИТЕЕ
помогите пожалуйста задача по информатике if8 паскаль
даны два числа.Вывести в начале большее а затем меньшее.
Помогите, срочно!!!Задача по паскалю!Заполнить массив из 10 элементов положительных или отрицательных чисел во 2 массив переписать сначала отрицательные а
потом положительные числа, вывести результат
Вы находитесь на странице вопроса "Помогите пожалуйста!! Задача по паскалю!", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.