В программах и алгоритмах могут встретиться следующие виды ошибок (выберите один или несколько верных вариантов): * эмпирические синтаксические логические феерические среди перечисленных нет ни одного верного ответа
// PascalABC.NET 3.2, сборка 1344 от 22.11.2016 // Внимание! В более ранних версиях работа не гарантируется!
begin var m:=ReadInteger('Количество строк в массиве:'); var n:=ReadInteger('Количество столбцов в массиве:'); Writeln('Вводите элементы массива'); var a:=new integer[m,n]; for var i:=0 to m-1 do for var j:=0 to n-1 do Read(a[i,j]); Writeln('-'*20); foreach var c in a.Cols do Write(c.Sum,' ') end.
Пример Количество строк в массиве: 4 Количество столбцов в массиве: 3 Вводите элементы массива 1 6 -2 0 6 8 -3 6 1 4 6 -3
// Внимание! В более ранних версиях работа не гарантируется!
begin
var m:=ReadInteger('Количество строк в массиве:');
var n:=ReadInteger('Количество столбцов в массиве:');
Writeln('Вводите элементы массива');
var a:=new integer[m,n];
for var i:=0 to m-1 do
for var j:=0 to n-1 do Read(a[i,j]);
Writeln('-'*20);
foreach var c in a.Cols do Write(c.Sum,' ')
end.
Пример
Количество строк в массиве: 4
Количество столбцов в массиве: 3
Вводите элементы массива
1 6 -2
0 6 8
-3 6 1
4 6 -3
2 24 4
Решение Pascal
Delphi/Pascal
program Case5;
var
N,A,B:Integer;
begin
Write('Введите номер действия: ');
Readln(N);
Write('Введите число A: ');
Readln(A);
Write('Введите число B: ');
Readln(B);
Case N of
1: Writeln(A+B);
2: Writeln(A-B);
3: Writeln(A*B);
4: Writeln(A/B);
end;
end.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
program Case5;
var
N,A,B:Integer;
begin
Write('Введите номер действия: ');
Readln(N);
Write('Введите число A: ');
Readln(A);
Write('Введите число B: ');
Readln(B);
Case N of
1: Writeln(A+B);
2: Writeln(A-B);
3: Writeln(A*B);
4: Writeln(A/B);
end;
end.
Решение C
C
#include <stdio.h>
int main(void)
{
system("chcp 1251");
int n;
float a,b;
printf("N:") ;
scanf ("%i", &n);
printf("A:") ;
scanf ("%f", &a);
printf("B:") ;
scanf ("%f", &b);
switch (n) {
case 1:
printf("%f\n",a+b) ;
break;
case 2:
printf("%f\n",a-b) ;
break;
case 3:
printf("%f\n",a*b) ;
break;
case 4:
printf("%f\n",a/b) ;
break;
}
return 0;
}
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
#include <stdio.h>
int main(void)
{
system("chcp 1251");
int n;
float a,b;
printf("N:") ;
scanf ("%i", &n);
printf("A:") ;
scanf ("%f", &a);
printf("B:") ;
scanf ("%f", &b);
switch (n) {
case 1:
printf("%f\n",a+b) ;
break;
case 2:
printf("%f\n",a-b) ;
break;
case 3:
printf("%f\n",a*b) ;
break;
case 4:
printf("%f\n",a/b) ;
break;
}
return 0;
}
Объяснение: