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

Последовательности - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Символьная матрица http://www.cyberforum.ru/cpp-beginners/thread384251.html
Добрый день вопрос таков , вот создал я массив строк ввожу символы , задача в следующем , считываю строку в массиве и если там есть символ 'k' то он выводи эту строку . Вот как считать строку и...
C++ Не хватает знаний. Не знаю, как на с++ реализовать возможность Есть одна вещь, которую у меня сделать никак не получается. В моей старенькой 2008 студии отсутствуют стандартизированные интеллектуальные указатели. По этой причине я когда то написал... http://www.cyberforum.ru/cpp-beginners/thread384248.html
Цикл с параметром C++
Ребят,помогите перевести программу на С++: Даны два целый числа А и В (А<B).Найти сумму всех целых чисел от А до В включительно. var A,B:integer; temp:integer; i:integer; begin temp:=0;
посследовательности C++
вводим число пока оно не равно 0. и складываем только положительные четные числа, выводим сумму. с циспользования цикла do {} while();
C++ Windows forms: обращение к одной форме из другой http://www.cyberforum.ru/cpp-beginners/thread384230.html
Здравствуйте! Помогите пожалуйста: есть главная форма Form1 и форма с логином и паролем Login. Как обратиться из формы Login к элементу из формы Form1? Заранее спасибо.
C++ Определение и реализация класса. Есть два кода: 1) Объявление класса #include <winioctl.h> #define FILE_DEVICE_WINIO 0x00008010 #define WINIO_IOCTL_INDEX 0x810 #define IOCTL_WINIO_ENABLEDIRECTIO CTL_CODE (... подробнее

Показать сообщение отдельно
-=Дрюня=-
0 / 0 / 0
Регистрация: 11.10.2011
Сообщений: 17

Последовательности - C++

15.11.2011, 11:09. Просмотров 243. Ответов 1
Метки (Все метки)

ребят,помогите перевисти програмку на С++:

Дано целое число N и набор из N вещественных чисел. Вывести в том же порядке округленные значения всех чисел из данного набора (как целые числа), а также сумму всех округленных значений.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
var
i,N:integer;
TheArr:array [1..100] of real ;
temp:real;
Summa:real;
begin
writeln('Введите N:');readln(N);
for i:=1 to N do
begin
write('TheArr[',i,']=');readln(TheArr[i]);
end;
Summa:=1;
for i:=1 to N do
begin
temp :=round(TheArr[i]);
Summa:=Summa+temp;
write(temp:2:2,' ');
end;
writeln('СуСумма всех округленых знаении:',Summa);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.