Форум программистов, компьютерный форум CyberForum.ru
Наши страницы

Сумма элементов массива (Pascal -> C++) - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Перегрузка операторов http://www.cyberforum.ru/cpp-beginners/thread889859.html
Вообщем в чём дело смысл перегрузки операторов ясен,зачем применять тоже ясно,как организуется понятно,перегрузка унарных операторов понятно,но вот применение перегрузки операторов для создания новых...
C++ перечисление, enum Здравствуйте! Пишу программу "картотека для работников", использую enum при выборе Отдела(программисты менеджеры, доставка) и при выборе Транспорта в отделе доставка(авто,поезд,самолет,корабль). При... http://www.cyberforum.ru/cpp-beginners/thread889850.html
исправить ошибки C++
кому не сложно запустите и скажите в чем ошибка, одногруппница попросила посмотреть что не так, исправил 16 из 18 ошибок, больше не смог( пожалуйста. #include <stdio.h> #include <conio.h>...
C++ Не могу найти ошибку(
Когда ввожу матрицу 4 на 4 все норм, когда больше размерность то не переставляет блоки!! Помогите разобраться почему так? #include<iostream.h> #include<conio.h> #include<time.h>...
C++ Прочтите пожалуйста очень нужно.Я даже не знаю как прикрепить фотки, поэтому только вот так( http://www.cyberforum.ru/cpp-beginners/thread889831.html
Wolfriend, оформите тему в соответствии с правилами форума: 1) для каждого задания создайте отдельную тему 2) текстовые задания набирайте от руки 3) задания сопровождайте пояснениями 4) для...
C++ программа для расчёта разрезов помогите пожалуйста новичку, необходимо написать программу про расчёту минимальных и максимальных разрезов на пути. тоесть должна быть функция добавления форм и путей между формами, а от сюда уже... подробнее

Показать сообщение отдельно
Locast
0 / 0 / 0
Регистрация: 30.05.2013
Сообщений: 8

Сумма элементов массива (Pascal -> C++) - C++

03.06.2013, 22:08. Просмотров 230. Ответов 3
Метки (Все метки)

Прошу помочь с такой же прогой на си
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var
     n, s, i: integer;
     s1: integer;
     a: array[1..100] of integer;
 
begin
     readln(n); 
     s := 0;
     for i := 1 to n do 
     begin
          a[i] := -10 + random(20);
          write(a[i], ' ');
          s := s + a[i];
     end;  
     writeln('');
     writeln(s);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru