сервис вопросов и ответовнайти сумму вво с клавиатуры положительных чисел. выход при о
5-9 класс|
|
SlavaOD
23 сент. 2013 г., 11:07:27 (10 лет назад)
Alechin
23 сент. 2013 г., 12:47:51 (10 лет назад)
var
a, s: real;
begin
s:= 0;
repeat
writeln('Введите положительное число');
readln(a); //Вводим положительное число
if a < 0 then {Если введено не положительное число, печатаем сообщение об этом и начинаем цикл сначала}
begin
writeln('Введено не положительное число. Введите число еще раз.');
continue;
end;
s:= s + a;
until a = 0;
writeln('Сумма введенных чисел равна: ', s); //Выводим сумму
end.
123456ups
23 сент. 2013 г., 15:41:27 (10 лет назад)
var sum,x:integer;
begin
x:=1;
while x<>0 do begin readln(x); sum:=sum+x; end;
writeln(sum);
end.
Ответить
Другие вопросы из категории
1.оцените информационный объем стереоаудиофайла длительностью 1 сек при частоте дискретизации 48000 и разрешении 16 битов 2.оцените
информационный объем моноаудиофайла длительностью 1 сек при частоте дискретизации 48000 и разрешении 16 битов
Читайте также
1)найти сумму первых k последовательных нечетных чисел. написать программу в паскале. 2)вывести на экран натуральные нечетные числа от 5 до 55.тоже
паскаль 3)найти произведение последовательных натуральных чисел от n до m. написать программу паскаль. 4)найти сумму последовательных натуральных чисел от 10 до 15.тоже паскаль
на языке программирования Паскаль составить программу суммы нахождения суммы вводимых с клавиатуры положительных чисел . Печать результата по вводу 0 (
используя цикл while т.е. предусловие ).
1.С клавиатуры вводится 3 числа. Найти сумму только из положительных чисел.
(Тема:Программирование ветвлящихся и цепленных алгоритмов)
2.Дано двухзначное число,найти сумму и произведение его чисел.
(2-ая задача решается с div и mod)
(Тема:Программирование ветвлящихся и цепленных алгоритмов )
1)дан массив. найти сумму положительных и нечетных и количество отрицательных четных элементов
2)Дан массив целых чисел.Найти сумму четных положительных чисел, стоящих на нечетных местах и количество отрицательных элементов, стоящих на четных местах.
3)дан массив целых чисел.найти сумму четных и положительных элементов, расположенных до первого отрицательного элемента.Примечание:при вводе необходимо учесть, что первый элемент не может быть отрицательным.
Вы находитесь на странице вопроса "найти сумму вво с клавиатуры положительных чисел. выход при о", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.