Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 978 ответов!

Помогите написать программу в Паскале и блок-сxему.

10-11 класс

Задача: ввести 10 чисел, если число положительное, то от него отнять 0,5, если число отрицательное, то ничего с ним не делать. Вывести результат на экран.

Pokercool 08 сент. 2013 г., 12:02:39 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Moroian23
08 сент. 2013 г., 14:04:28 (10 лет назад)

var a,b,i: real;
begin
b:=0,5;
for i = 1 to 10 do
begin
readln (a);
if a<0 then
writeln (a)
else
a:=a-b;
writeln (a);
end;
end.

Ответить

Другие вопросы из категории

Нужно решение) кто способен?

Вопрос 1.
На одномернный массив, вывести его в порядочный вид по убыванию!

Целесообразно ли с точки зрения безопасности компьютерной

системы объединение в одном лице функций администратора и аудитора?

Читайте также

Помогите написать программу в паскале. Задание:На плоскости даны 2 точки А (х1; у2) и В (х2; у2), определить какая из них находится дальше от начала коо

рдинат. Я поняла, что нужно найти их длины (формулы я знаю), а правильно написать программу не могу

Помогите написать программу на паскаль и блок схему

Найти сумму
1,1-1,2+1,3.......1.n
n- целое, вводится с клавиатуры

Помогите написать программу по Информатике! Найти произведение двузначных нечетных чисел, кратных

13.

Нужно написать программу на цикле с предусловием, на Паскале.

Написать Программу в паскале которая посчитала бы 5^123 (это цикл как бы должен быть)

http://primat.org/index/0-128 вот сайт что бы написать программу.



Вы находитесь на странице вопроса "Помогите написать программу в Паскале и блок-сxему.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.