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

Решить задачу на языке программирования Pascal:

10-11 класс

Найти сумму натуральных четных чисел в промежутке от 1 до 13. Если эта сумма больше 15, вывести сообщение "Много!", в противном случае вывести сообщение "Мало!".

олячка2002 23 февр. 2016 г., 10:11:22 (8 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Райлина
23 февр. 2016 г., 12:42:57 (8 лет назад)

var
  a       :  array [1..100] of longint;
  sum,i : longint;
begin
sum:=0;
for i:=1 to 13 do begin readln(a[i]); sum:=sum+a[i]; end;
if sum>15
  then writeln('Много')
  else writeln('Мало');

end.

+ 0 -
042004даша
23 февр. 2016 г., 14:17:01 (8 лет назад)

а нам надо что-то вводить?

+ 0 -
Nkolioglo
23 февр. 2016 г., 16:24:57 (8 лет назад)

наверное

+ 0 -
Ivandashutin
23 февр. 2016 г., 18:17:02 (8 лет назад)

... тогда вводим 13 чисел?

+ 0 -
Anna2004rose
23 февр. 2016 г., 20:24:41 (8 лет назад)

скорей всего

+ 0 -
Lindaa
23 февр. 2016 г., 22:56:00 (8 лет назад)

ты такая умная/умный

Ответить

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

1)составьте программу вычисления суммы чисел в диапазоне от 45 до 115 45+....+115 оператор While2)Составьте программу которая выводит на экран числа

кратные 2 и 13 в диапазоне от 2 до 150
3)Дано вещественное число А и целое число N(>0).Испульзуя один цикл вывести все целые степени числа А от 1 до N

------------------------ОПЕРАТОР WHILE

Упростить выражения: 1. (A+B+C)&(неA&B&неС) 2. (A+B)&(неB+A)&(неC+B) 3. (1+(A+B))+((A+C)&1) 4.

(A&B&неC)+(A&B&C)+не(A+B) Повышенный уровень (A+B+C)&не(A+неB+C)

Помогите пожалуйста))) Мне срочно надо)))

Алгоритм вычисления значения функции

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

нужна программа на языке программирования Pascal.

Дана матрица А[8,8] четных чисел натурального ряда (от 2 до 128).
1)Заполнить и записать матрицу.
2)Определит число элементов больших 18 и меньших 60. заменить их на 0.затем записать получившуюся матрицу.
3)Определить произведение главной диагонали и вывести эти элементы на экран.
4)Реализовать определение суммы элементов любого столбца.
Спасибо.



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