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

перевод с паскаля на С++ - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ дано натуральное число N. Определить входит ли цифра N в это число? http://www.cyberforum.ru/cpp-beginners/thread449785.html
дано натуральное число N. Определить входит ли цифра N в это число? никак не могу составить программу для этой задачи...
C++ Создайте массив из пяти фамилий и выведите их на экран 1. Создайте массив из пяти фамилий и выведите их на экран те из них, которые начинаются с определенной буквы, которая вводится с клавиатуры. 2. Даны координаты вершин многоугольника (x1, y1,x2,y2,…x10,y10). Напишите программу для вычисления его периметра (вычисление расстояния между вершинами оформить подпрограммой). заранее очень сильно благодарю!сам не особо просто шарю,бьюсь,бьюсь,не... http://www.cyberforum.ru/cpp-beginners/thread449765.html
Файловый указатель C++
как мне переместить файловый указатель в конец строки? например это: fseek(fp, 0L, SEEK_SET); это переводить в начало файла а это в конец файла: result = fseek(fp, 0L, SEEK_END); а как будет только переместить его в конец первой строки ?
Составление программ на использование двумерных массивов C++
Написать программу, которая запрашивает размерность двумерного массива, заполняет его случайными числами от 4 до 12 и меняет местами первый и последний столбец массива.
C++ Получение параметра из потока win32api c++ http://www.cyberforum.ru/cpp-beginners/thread449753.html
Задача заключается в том,что мне присылают в main в качестве параметров количество потоков,и аргумент. Этот аргумент нужно в потоке поменять и вернуть в первичный поток. Проблема заключается в том ,что не знаю, как мне получить этот измененный параметр. GetExitCodeThread возвращает код,с ним не получается:( Подскажите,пожалуйста. #include <windows.h> #include <stdio.h> #include <stdlib.h>...
C++ Матрица, найти среднее арифметическое Здравствуйте, можете помочь с заданием: Заданная матрица 6х6. Найти среднее арифметическое элементов каждой строки матрицы. Заранее спасибо. подробнее

Показать сообщение отдельно
helpme_plz
0 / 0 / 0
Регистрация: 07.02.2012
Сообщений: 21
20.02.2012, 21:05     перевод с паскаля на С++
Дан массив ненулевых целых чисел размера N. Проверить, образуют ли его элементы геометрическую прогрессию (см. задание 4). Если образуют, то вывести знаменатель прогрессии, если нет — вывести 0.}

Задание 4. Дано целое число N (> 1), а также первый член A и знаменатель D геометрической прогрессии. Сформировать и вывести массив размера N, содержащий N первых членов данной прогрессии:}

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
Program Array25;
 
const
N = 10;
var 
IntArr:array[1..N]of integer;
q: real;
flag: boolean;
i:integer;
begin
flag:= true;
for i:=1 to N do
begin
IntArr[i]:=random(66);
end;
q:=IntArr[2]/IntArr[1];
for i:=3 to N do
begin
if((flag = true) or(intarr[i]/intarr[i-1] = q))then
flag:=true
else
flag:=false;
end;
 
if flag then
writeln('Yes, q = ', q)
else
writeln('No');
end.
Код выделяем тегами![/PASCAL]

Добавлено через 3 минуты
все научился) выделил тегом)
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 11:45. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru