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

Максимальный и минимальный элементы массива (перевести из языка Pascal в СИ) - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Указатели на передаваемые двумерные массивы в функцию http://www.cyberforum.ru/cpp-beginners/thread999425.html
Доброго времени суток) Вчера озадачился новым. В недавнем времени перешел на vs 2013 и тут при написании ф-ии решил передать в нее массив тк кк ф-ия копирует же как данные, а после завершения...
C++ Ошибка объявления объекта класса Добрый день, есть класс: #ifndef _SDLENTITY_H_ #define _SDLENTITY_H_ #include <vector> #include "SDLAnimation.h" #include "CSurface.h" class SDLEntity{ http://www.cyberforum.ru/cpp-beginners/thread999421.html
ошибки C++
#include <iostream> #include <conio.h> using namespace std; int fun (int a, int b ) { int *c, n; for (int i = 0; i < n; i++) { *c= a + b; } return *c;
C++ Функция time
Я нахожу с 1970 до текущей даты: time_t a = time(NULL); cout<<"Текущая дата, выраженная в часах:" <<(a/3600)<<endl; как найти с 1970 до заданной даты? везде искал не могу найти, я новичек...
C++ Списки С++ http://www.cyberforum.ru/cpp-beginners/thread999337.html
Пусть в файле хранятся записи со сведениями об автомобилях и их владельцах (марка, номер ГАИ, фамилия владельца); Необходимо: а) для каждой марки автомобиля составить список, содержащий фамилии...
C++ какой оператор выбрать? какой оператор взять вместо getch(), что бы возвращалось значение нескольких элементов и происходило вычисление N? #include <cstdlib> #include <iostream> #include <cstdio> #include <conio.h>... подробнее

Показать сообщение отдельно
Erondondon
0 / 0 / 0
Регистрация: 12.01.2014
Сообщений: 13
12.01.2014, 17:05
Добрый день помогите с переводом с паскаля в си
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Const st='SINUS';
Var s:string;
    k,i,j:byte;
Begin
    write('Введите строку: ');readln(s);
    j:=0;
    k:=Pos('!',s);
    if k>0 then 
    Begin
      For i:=1 to k-1 do
       if Pos(s[i],st)>0 then j:=1;
      writeln(j=1);
    End
    else writeln('Нету "!"');
    readln;
End.
0
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru