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

Перевод з С++ в Pascal.Неучил и всьо.Спс - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Одномерные массивы (практика) http://www.cyberforum.ru/cpp-beginners/thread269269.html
Уважаемые программисты, помогите пожалуйста решить задачи изложенные ниже с использованием библиотеки "math". Задание: В одномерном массиве, состоящем из n-целых элементов, вычислить: 1. Кол-во нечетных элементов, стоящих на нечетных местах в массиве; 2. Поменять местами первую и вторую половину массива(расположение элементов в каждой половине массива оставить в исходном порядке). Заранее...
C++ Символьные строки Задача такая: надо отделить имя файла и расширение от его пути но из за слэшей на экран выводится какаята ерунда, никак непохожая на имя файла #include <stdio.h> #include <conio.h> #include <ctype.h> #include <string.h> void main() { http://www.cyberforum.ru/cpp-beginners/thread269263.html
Даны 4 числа...C++ C++
Прошу помощи в решении 2-х последующих задач (пожалуйста помогите,завтра контрольная): 1) Даны 4 числа (a,b,c,d). Если a<b<c<d,то каждое из чисел заменить наибольшим,Если a>b>c>d,то каждое число увеличить в 10 раз,иначе каждое число заменить нулём. С++ 2)Вывести на экран таблицу квадратов чисел от 1 до 100. С++ Заранее благодарен.
C++ Найти все ненулевые элементы матрицы и записать их в новый массив
#include <cstdlib> #include <iostream> #include <stdio.h> #include <math.h> using namespace std; int main(int argc, char *argv) { int i,j,N,M;
C++ Иерархия классов, наследование (Млекопитающие, Парнокопытные, Птицы, Животное) http://www.cyberforum.ru/cpp-beginners/thread269184.html
нужно создать иерархию класcов с механизмом наследования млекопитающиеся, парнокопытные, птици, животное написать код я хочу написать сам , но основная проблем в том что с биологией у меня в школе не очень хорошо было... можите посоветовать какие основные элементы в классах сделать? что лучше наследовать в них? зарание спасибо ЗЫ извинясь за оибки в школе с русским тоже не очень хорошо у...
C++ Сортировка методом выбора. Структуры. Задание было вывести студенток первого курса в алфавитном порядке. Сортировка должна быть методом выбора. А как применить её для структур понять не могу(( #include<conio.h> #include<stdio.h> #include<iostream> using namespace std; struct w подробнее

Показать сообщение отдельно
MegaAce
 Аватар для MegaAce
330 / 304 / 65
Регистрация: 14.02.2010
Сообщений: 662
03.04.2011, 14:29     Перевод з С++ в Pascal.Неучил и всьо.Спс
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
30
31
32
33
34
35
36
uses crt;
const n=5;
var i,s,sz:integer;
    a,b:array[1..n] of integer;
begin
 randomize;
 writeln('Vvedite danie');
 for i:=1 to n do
 begin
  write('[',i+1899,']=');
  {readln(a[i]);}
  a[i]:=random(50)+50;
  writeln(a[i]);
 end;
 s:=0;
 
 for i:=1 to n do
  s:=s+a[i];
 sz:=round(s/n);
 
 for i:=1 to n do
  b[i]:=a[i]-sz;
 
 writeln('srednee kolichestvo oadkov ',sz);
 
 for i:=1 to n do
 begin
  if b[i]>0 then
   writeln('u ',i+1990,' vipalo na ',abs(b[i]),' bolshe ot normi');
  if b[i]<0 then
   writeln('u ',i+1990,' vipalo na ',abs(b[i]),' menshe ot normi');
  if b[i]=0 then
   writeln('u ',i+1990,' vipala norma');
 end;
 
end.
Добавлено через 43 секунды
Цитата Сообщение от canavaro Посмотреть сообщение
Решение надо чтоб выводило рандомом
Может входные данные??
 
Текущее время: 21:50. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru