Написать на Паскале программу, которая запрашивает с клавиатуры N случайных целых чисел и отыскивает их сумму. Число N вводится с клавиатуры. Создать для сделанной программки не наименее трёх тестов и проверить на их корректность работы метода.
- Альбина Долгачева
- Информатика
- 2019-06-10 19:45:02
- 1
- 1
Любовь Древлева 2019-06-10 19:52:28
Var n,i,s,c:integer;
begin
readln(n);
for i:=1 to n do //сколько случайных чисел будет.
begin
readln(c); //вводим произвольные числа
s:=s+c; //суммируем
end;
writeln(s); //Вывод суммы
end.
Лилия 2019-06-10 19:55:40
спасибо, на данный момент попробую ввести
, оставишь ответ?
Похожие вопросы
Вопросы ответы
Урок по информатике 9 класс. Язык программирования Паскаль
У вас классный сайт! Продаёте? Добрый день, меня зовут Николай — я владелец нескольких интернет — проектов. Ищу новые
Николай Александрович Карфополитский
«Статистика приведена за 2005 год» В 2005 году не было стольких возможностей для получения работы не требующей вышки(да
Источник: obrazovalka.com
Где ошибка??
Задание: Написать на Паскале программу, которая запрашивает с клавиатуры N произвольных целых чисел и ищет их сумму. Число N вводится с клавиатуры. Разработать для созданной программы не менее трёх тестов и проверить на них правильность работы алгоритма.
Я написала так:
uses crt;
var n,i,s,c:integer;
begin
clrscr;
readln(n);
s:=0;
for i:=1 to n do
begin
readln(c);
s:=s+c;
end;
writeln(s);
readkey;
end.
Где здесь допущена ошибка? Помогите!
- аноним
- больше 4 лет назад
- 1
- Информатика /
- 10 — 11 классы
1 ответы
- аноним
uses crt;
var n,i,s:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
begin
s:=s+i;
end;
writeln(s);
readkey;
end.
Последнее для темы Информатика
Начальные данные для исполнителя Водолей приведены на рисунке: Сколько литров останется в сосуде B
- около 1 года назад
- 1
Помогите с информатикой. РЕШИТЕ ЗАДАЧУ ЧЕРЕЗ ДАНО, ПО ВОЗМОЖНОСТИ РЕШИТЕ ЕЕ НА ЛИСТКЕ И ПРИКРЕПИТЕ Ф
- около 1 года назад
- 1
Смотрите надо сделать так пример консоль Сколько чисел вывести: 5 Текст:1 Текст:5 Текст:2 Текст
- около 1 года назад
- 1
Ребят помогите пожалуйста срочно надо сделать нужно все !!ДАМ 100 БАЛЛОВ!!
- больше 1 года назад
- 1
Как исправить ошибку в коде: Traceback (most recent call last): File «script.py», line 1, in name=i
- больше 1 года назад
- 1
Составить блок схему и написать код программы решающий следующую задачу: Существуют два материала X
- больше 1 года назад
Перечислите пункты контекстного меню выделив какой либо из объектов на рабочем столе
- больше 1 года назад
- Информатика /
- 10 — 11 классы
Вариант 2 1. 1. Упорядочи величины от наименьшей к наибольшей 140000 байт; 0,14 Мегабайт; 120 Кил
- больше 1 года назад
Решите задачу используя двумерный массив.Выведите два числа :номер строки и номер столбца,в которых
- больше 1 года назад
- 1
Оля прочитала повесть «Королевство кривых зеркал» и теперь представляет всё наоборот. Она заметила,
- больше 1 года назад
- 1
- Информатика /
- 10 — 11 классы
Работа с массивами Pascal
Web version of instagram for desktop and computer greatfon Browse Instagram with the best experience.
Источник: schoolsqa.com
Написать на Паскале программу, которая запрашивает с клавиатуры N произвольных…
Написать на Паскале программу, которая запрашивает с клавиатуры N произвольных чисел и ищет их сумму. Число N вводится склавиатуры.
в избранное ссылка
21 октября 2021
Program sumVar n,i,s: integer; a: array[1… 1000] of integer; beginWrite (‘Vvedite n’); readln (n); Write (‘Vvedite n chisel’); For i: =1 to n doread (a[i]); S: =0; For i: =1 to n doS: =S+a[i]; write (‘Summa ravna’, s) endВроде так. Это в консоли, так что она может сразу закрыться после выполнения программы.
Источник: gdzyuka.ru