Ответ:
10,19
Объяснение:
Просто скачай приложение фото матч
Ответ:
Объяснение:
using System;
public class Program
{
public static void Main()
{
int[] A = new int[30];
var rand = new Random();
for(int i = 0; i < 30; i ++) // Заполняем в цикле массив случайными числами от 0 до 100
A[i] = rand.Next(0, 100);
int kolichestvo, summa;
kolichestvo = 0;
summa = 0;
for(int i = 0; i < 30; i ++) //цикл по элементам массива
{
if((A[i] % 5) == 0)// операция "%" - остаток от деления, если = 0 значит поделилось нацело, если не равно нулю, значит поделилось с остатком
{
if((A[i] % 3) != 0)
{
kolichestvo = kolichestvo + 1;
summa = summa + A[i];
}
}
}
Console.Write("Сумма: ");
Console.Write(summa);
Console.Write(" Количество: ");
Console.Write(kolichestvo);
}
}
uses crt;
var n:integer;a,b:real;
begin
clrscr;
writeln('Введите номер');
readln(n);
writeln('Введите 1 число');
readln(a);
writeln('Введите 2 число');
readln(b);
case n of
1:writeln(a+b);
2:writeln(a-b);
3:writeln(a*b);
4:writeln(a/b);
end;
end.
//PascalABC.Net 3.1.0.1200
var
c: char;
begin
readln(c);
if c in ['0'..'9'] then
writeln(ord(c))
else
writeln(chr(ord(c) + 1), chr(ord(c) + 2));
if c in ['A'..'Z'] then
writeln(LowCase(c));
end.
765, 766, 767, 770, 771, 772, 773, 774, 775, 776, 777, 1000, 1001,1002,1003,1004