сервис вопросов и ответовНаписать программу на языке Паскаль. Вводятся размер и элементы одномерного массива A(N), состоящего из целых чисел. Подсчитать сумму простых
10-11 класс|
|
чисел, оканчивающихся на 3. Результат вывести на экран.
Руслан20009
26 сент. 2013 г., 15:13:38 (10 лет назад)
54365
26 сент. 2013 г., 17:28:18 (10 лет назад)
uses crt;
Var a:array [1..100] of integer; i,n,s: integer;
Begin
Writeln('Введите размер массива'); readln(n);
For i:=1 to n do begin
writeln('Введите элемент массива номер ',i); read(a[i]);
end;
For i:=1 to n do
if a[i] mod 10=3 then s:=s+a[i];
Writeln('Сумма = ',s);
end.
Написано через PascalABC. Если используете другой паскаль вместо первой строчки пишите "Program 123;"
Ответить
Другие вопросы из категории
винни пух и пятачок пошли на день рождения к ослику иа. каждый из них приготовили поздравительную открытку. открытка винипуха задержал 162 символа и
занимала объем 810 бит. открытка пятачка Занимала 852 бита и содержала 213 символов. чей алфавит содержит больше символов ?помогите очень прошу
Читайте также
написать программу на Assembler
добрый вечер, всем. помогите, пожалуйста, написать программу на Ассемблере.
задание:
Создать программу на языке Ассемблер, что позволяет организовать вычисления над элементами массивов
Объединить два массива 8-битных целых чисел со знаком. Сначала элементы второго затем первого.
заранее огромное спасибо всем!
3. Не используя функцию возведения в квадрат, напишите на языке Паскаль наиболее короткие алгоритмы вычисления а) y=x¹° б)y=x¹⁵ или а) y=x^10
б)y=x^15
Постараться использовать минимальное количество дополнительных переменных.
4. Запишите на языке Паскаль программу циклического обмена значениями трёх переменных a,b,c. Схема циклического обмена: a ← b ← c. Например, если до обмена было: a=1, b=2, c=3, то после обмена должно стать: a=2, b=3, c=1.
написать программу на языке паскаль
пользователя вводит числа с интервалом 0,1
у=3х*х+х-4 на отрезке от а до в
Написать программу на языке Паскаль для вычисления значений функции y (см. для своего варианта) на интервале [a,b] с шагом h. Значения a,b и h ввести с
клавиатуры. На экран вывести результат вычислений в виде таблицы. 1 Блок-схема алгоритма программы, выполненная с использованием графических средств редактора WORD; 2 Текст программы; 3 Результаты выполнения (копия экрана). (3x+2)^2- sqrt3x/(3x)^2 a 5;b 7; h 0,1
1) Напишите пожалуйста программу (на языке BASIC) вычисления по длинам двух сторон треугольника и углу между ними длины третьей стороны и двух других
углов.
2)
Напишите пожалуйста программу (на языке BASIC) для определения подобия:
а) двух прямоугольников по двум смежным сторонам;
б) двух треугольников по трем сторонам.
Вы находитесь на странице вопроса "Написать программу на языке Паскаль. Вводятся размер и элементы одномерного массива A(N), состоящего из целых чисел. Подсчитать сумму простых", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.