using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
namespace example
{
class Program
{
static void Main(string[] args)
{
double x = 0;
Console.WriteLine("Введите число n");
int n = int.Parse(Console.ReadLine());
for (int i = 0; i < n; i++)
{
Console.WriteLine("Введите " + (i+1) +" число");
x =x + int.Parse(Console.ReadLine());
}
x = x / n;
Console.WriteLine("среднее арифметическое целых чисел составило: "+ x);
Console.ReadLine();
}
}
}
var a,b,c:integer;
begin
write('Введите результаты 3-х экзаменов: ');
readln (a,b,c);
if a+b+c < 13 then writeln ('Сожалеем, вы не приняты...')
else writeln('Поздравляем, вы приняты!')
end.
const n=3;
var a:array [1..n,1..n] of integer;
i,j,s:integer;
begin
for i:=1 to n do
begin
for j:=1 to n do
begin
write('Введите результат ',j,' экзамена ',i,' ученика ');
readln(a[i,j])
end
end;
writeln;
for i:=1 to n do
begin
s:=0;
for j:=1 to n do s:= s+a[i,j];
if s < 13 then writeln ('Сожалеем, ученик ',i,' вы не приняты...')
else writeln('Поздравляем, ученик ',i,' вы приняты!')
end
end.
a, b: real;
begin
write('Введите числа: ');
readln(a, b);
writeln('Сумма = ', a + b, #10, 'Разность = ', a - b, #10, 'Произведение = ', a * b, #10, 'Частное = ', a / b);
end.