Program pr1;var a, b, ca,b,c : real;begin\quadwriteln('Введи границы отрезка');\quadreadln(a, ba,b );\quadwriteln('Введи точку отрезка');\quadreadln(cc );\quadif (c-a=b-cc−a=b−c ) then writeln('Точка с - середина отрезка') else writeln('Точка c не является серединой');end.На вход подаются значения a=3a=3, b=14b=14, c = 8.49c=8.49.Какое сообщение мы увидим на экране после выполнения программы? Сообщение "Точка с - середина отрезка"Сообщение "Точка c не является серединой"Пустое сообщение
Ответы на вопрос:
java
import java.util.random;
public class myapp{
public static void main (string {
random rand = new random();
int n = rand.nextint(50);
int [] arr = new int[n];
for(int i = 0; i < n; i++) {
int j = rand.nextint(50);
arr[i] = j;
}
for( int i = 0; i < n; i++) {
if ( arr[i] % 2 == 0 ) {
system.out.print(arr[i] + " ");
}
}
}
}
pascal
program myapp;
var
i, n , j: integer;
arr: array of integer;
begin
randomize;
n : = random(50);
setlength(arr, n);
for i: = 0 to n do
begin
j: = random(50);
arr[i]: = j;
end;
for i: = 0 to n do
begin
if( arr[i] mod 2 = 0 ) then
begin
write(arr[i], ' ');
end;
end;
end.
Популярно: Информатика
-
nini852316.06.2022 07:34
-
123gordeev06.08.2021 19:54
-
ggggdcdxf24.03.2023 20:16
-
ksu010157sha23.06.2021 05:16
-
Nelckin06.02.2020 17:36
-
MezarYT01.03.2021 06:35
-
putnikputen12.01.2021 08:08
-
gireeva0024.03.2020 20:57
-
fjdjwjqksnddjj04.01.2022 10:34
-
bogdanmaltsev31.10.2021 04:47