как написать эту процедуру в С++ ? Program pr;
10-11 класс
|
uses crt;
type mas=array[1..10] of integer;
Var a,b:mas;
procedure Vvod(Var a:mas);
Var i:integer;
Begin
for i:=1 to 10 do readln(a[i]);
end;
#include "stdafx.h"
#include <iostream>
using namespace std;
void vvod(int *m,int size) {
for(int i = 0; i<size ;i++) {
cin >> m[i];
}
}
int main()
{
int m[10] = {0};
vvod(m,sizeof(m)/sizeof(*m));
return 0;
}
Другие вопросы из категории
быстро, затратив 5 с, и еще 2 с потратил на перекладывание в банку. Но чем меньше становилось в воде рыбок, тем труднее было их поймать. На каждую следующую рыбу он затрачивал больше на 5%, чем на предыдущую. Сколько минут времени он затратит на переселение рыбок? Построить и исследовать модель в Ms Excel.
1) информатики
2) теории систем
3) автоматики
4) средств создания программного обеспечения
5) является самостоятельной наукой
составить программу, которая запрашивает 2 числа если они оба четные, то сумма. Если они разные то найти произведения
Читайте также
А.А. с198
program pr;
uses crt;
var f:file of integer;
n:integer;
a:string;
begin
clrscr;
a:='c:\f1.txt';
assign(f,a);
rewrite(f);
writeln('n: ');
readln(n);
write(f,n);
close (f);
readln;
end.
после выполнения программы в файле f1.txt вместо значения n=5 появилось -256
что не так ?
дробь представлять двумя целыми числами: первое число представляет числитель дроби, а второе - знаменатель. В процессе вычислений требуется сокращать дроби на их наибольший общий делитель (НОД). Если одно из чисел равно нулю, то НОД берем равным 1. Разработать также отдельные процедуры для ввода (на экран выводится надпись: «Введите числитель и знаменатель обыкновенной дроби») и вывода обыкновенных дробей (a/b).
элементов одномерного массива. Используя эту процедуру, поменять местами в строке
наибольший и наименьший элементы соответственно с первым и последним элементом
строки.

2. Выпишите недопустимые имена переменных:
a) Nomer;
b) S34;
c) И92;
d) Kol_vo54;
e) 45_A;
i) fg-л23
3. Установите соответствие (с помощью стрелок) между переменной и типом данных:
а) A:=3.234 а) Integer
b) Z:=14 b) Real
c) B:=10351 c) Byte
d) K:=-0.2 d) Word
e) C:= 64000
4. Запишите инструкцию:
а) присваивающую переменной V значение 7;
б) увеличивающую значение переменной Z на 30;
в) вычисляющую значение переменной R по формуле (X2+Y2):2;
5. Опишите переменные, необходимые для вычисления:

при x=-5.3, y=7.42
6. Напишите инструкцию вывода на экран:
а) вашего имени б) числа 400 в) значения выражения 7,3(3,22+8,61)
7. Определите, какое значение примет переменная С в результате выполнения данной последовательности операторов присваивания:
a:=8; b:=a/2; c:=43 mod a; a:=(b+c) div 6; b:=b+1; c:=sqrt(abs(a*b-14));
8. Установите соответствие между служебными словами и названиями разделов программы:
а) Var а) Раздел операторов
b) Program b) Раздел имени программы
c) Uses c) Раздел описания переменных
d) Begin …end d) Раздел описания библиотечных модулей
9. Найдите ошибки в записях оператора:
a) Write ©;
b) Writeln;
c) Writeln (Введите любое число);
d) Write X,Y;
e) WRITELN (‘воскресенье, нерабочий день’);
10. Какая структура программы верная:
begin
program MyFirst;
X:=Y+195;
end.
program MyProg;
begin
Writeln (‘Привет’);
end.
11. Расположите в правильном порядке строки программы, вычисляющей периметр и площадь параллелограмма:
1) S:=a*h;
6) var a,b,h,p,s: integer;
2) end.
7) readln;
3) program pr;
8) Writeln(‘p=’,p,’ s=’,s);
4) p:=2*(a+b);
9) a:=6;b:=3;h:=4;
5) Uses crt;
10) clrscr;
11) begin
12. Дан текст программы в таблице с ошибками:
исправьте ошибки в программе;что выведется на экран в результате выполнения программы?
Программа с ошибками
Программа без ошибок
На экране будет напечатано:
War: a,b,c – integer, x: real;
Bigin
A=7, b=3,2, c:=a+b;
Writln (summa=, c);
C:=c/2; x:=a-c;
Writeln(‘x=’ , x, ‘kvadrat=’, x*x);
and
13. Перевести блок-схему на язык Паскаль.
Вычисление расстояния между точками А и B.

цифр S целого числа N (N — входной, S — выходной
параметр). Используя эту процедуру, найти суммы цифр пяти данных чисел.