7-3-3
var
a, b: integer;
begin
Writeln('Введите 2 числа:');
Read(a, b);
Writeln('Сумма чисел: ', a + b);
Writeln('Разность чисел: ', a - b);
Writeln('Целочисленное деление: ', a div b);
Writeln('Остаток от деления: ', a mod b);
end.
7-3-5
n: integer;
Writeln('Введите N: ');
Read(n);
if n mod 2 = 0 then
Writeln('Следующее четное: ', n+2)
else Writeln('Следующее четное: ', n + 1);
КуМир
алг
нач
цел a,c
ввод a
c:=mod(a,2)
если c=0
то
вывод a+2
иначе
вывод a+1
все
кон
Вводите путь к файлу, кол-во букв и цифр будет в консоли и в конце файла
using System;
using System.IO;
using System.Text;
namespace Program
{
class Program
static void Main(string[] args)
string inputFilePath = Console.ReadLine();
string inputStr = File.ReadAllText(inputFilePath);
int letters = 0, digits = 0;
foreach (var s in inputStr)
if (char.IsLetter(s))
++letters;
else if (char.IsDigit(s))
++digits;
}
File.AppendAllText(inputFilePath, $"Letters: {letters}, Digits: {digits}");
Console.WriteLine($"Letters: {letters}\n\rDigits: {digits}\n\r");
Console.ReadKey();
7-3-3
var
a, b: integer;
begin
Writeln('Введите 2 числа:');
Read(a, b);
Writeln('Сумма чисел: ', a + b);
Writeln('Разность чисел: ', a - b);
Writeln('Целочисленное деление: ', a div b);
Writeln('Остаток от деления: ', a mod b);
end.
7-3-5
var
n: integer;
begin
Writeln('Введите N: ');
Read(n);
if n mod 2 = 0 then
Writeln('Следующее четное: ', n+2)
else Writeln('Следующее четное: ', n + 1);
end.
КуМир
алг нач цел а, б, с,д ввод а, б с:= div(а,б) д:= mod(а,б) вывод а + б, нс, а-б, нс, с, нс,д коналг
нач
цел a,c
ввод a
c:=mod(a,2)
если c=0
то
вывод a+2
иначе
вывод a+1
все
кон
Вводите путь к файлу, кол-во букв и цифр будет в консоли и в конце файла
using System;
using System.IO;
using System.Text;
namespace Program
{
class Program
{
static void Main(string[] args)
{
string inputFilePath = Console.ReadLine();
string inputStr = File.ReadAllText(inputFilePath);
int letters = 0, digits = 0;
foreach (var s in inputStr)
{
if (char.IsLetter(s))
++letters;
else if (char.IsDigit(s))
++digits;
}
File.AppendAllText(inputFilePath, $"Letters: {letters}, Digits: {digits}");
Console.WriteLine($"Letters: {letters}\n\rDigits: {digits}\n\r");
Console.ReadKey();
}
}
}