// PascalABC.NET
// Версия 3.4 сборка 1749 (18.08.2018)
Если места нумеруются с 1:
begin
ReadlnString.Select((i, j)-> (i, j + 1)).Where(t -> (t[1].IsOdd) and (t[1] mod 3 <> 0) and (t[0] = 'd')).Count.Println
end.
Если места нумеруются с 0:
begin
ReadlnString.Select((i, j)-> (i, j)).Where(t -> (t[1].IsOdd) and (t[1] mod 3 <> 0) and (t[0] = 'd')).Count.Println
end.
Примем A3 за х , тогда формула будет выглядеть следующим образом (+ подставляем имеющиеся значения):
(2х-5)*8=40
делим обе части уравнения на 8 , тогда
2х-5=5
2х=10
х=5
Ответ : 5
Var
x,y:real;
Begin
writeln('Введи значение аргумента х: ');
readln(x);
if x<-5 then y:=x;
if x>-5 and x<5 then y:=abs(x+2);
if x>5 then y:=cos(x);
writeln('значение функции в точке равно ',y);
readln;
End.
Ssh-криптографический протокол,более безопасен и широко используется
#include <iostream>
#include <clocale>
#include <cstdlib>
using namespace std;
void main(){
setlocale(LC_ALL, "");
int x, y;
cout << "Введите X и Y =>";
cin >> x >> y;
if (x == 0 || y == 0) { cout << "\nНе используйте 0!\n"; system("Pause"); exit(1); }
if (x > 0 && y > 0) cout << "\nПервая четверть\n";
else if (x < 0 && y > 0) cout << "\nВторая четверть\n";
else if (x < 0 && y < 0) cout << "\nТретья четверть\n";
else if (x > 0 && y < 0) cout << "\nЧетвертая четверть\n";
system("Pause");}