Везде значения вводятся с клавиатуры! на java если изучали массив: public class qwert { public static void main(String args[]) { Scanner scn = new Scanner(System.in); int[] a = new int[5]; int k = 0; for (int i = 0; i < 5; i++) { a[i] = scn.nextInt(); k = k + a[i]; if (i == 4) System.out.println(k/i); } }} если не изучали массив: public class qwert { public static void main(String args[]) { Scanner scn = new Scanner(System.in); int a = scn.nextInt(); int b = scn.nextInt(); int c = scn.nextInt(); int d = scn.nextInt(); int e = scn.nextInt(); int s = (a + b + c + d + e) / 5; System.out.println(s); }} на паскале через массив: var a:array [1..5] of integer; i:integer; s:real; begin for i := 1 to 5 do begin readln(a[i]); s := s + a[i]; if i = 5 then write (s/i); end; end. не через масивы: var a,b,c,d,e :integer; s:real; begin readln(a,b,c,d,e); s := (a+b+c+d+e)/5; write(s); end.
const n = 9; var i,min,b : integer; a : array [1..n] of integer; begin for i := 1 to n do a[i] := 10 + random (141);
min := 151; for i := 1 to n do begin if a[i] < min then begin if a[i] div 100 > 0 then b := ((a[i] div 10) - (a[i] mod 10)) div 10 else b := a[i] div 10; if b mod 2 = 1 then min := a[i]; end; end; if min = 151 then writeln ('not found') else writeln (min); end.
ответ:
код к : «из слова тестирование сделать слово товар»
1.var s: string;
2.begin
3.s: ='тестирование';
4.delete(s,1,2);
5.delete(s,5,2);
6.writeln(s);
7.readln
8.end.
объяснение: