В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
podgainiyroma
podgainiyroma
16.04.2023 17:59 •  Информатика

Какие предложения являются высказываниями, а какие нет. какие ложные, какие истиные:
1)как хорошо быть генералом!
2) ты знаешь логики?
3)выучи урок заданный по .
4) есть школьники, которые знают информатику на "5".
5) всякая истина является конкретной.
даны простые высказывания: запишите умозаключения
ни одна работа не весела.
некоторое чтение- работа.

Показать ответ
Ответ:
arujanjagipar
arujanjagipar
09.02.2020 10:52

#include<fstream>

#include <iostream>

#include <algorithm>

#include <string>

#include <map>

int main()  

{

std::string fname;

//ввод названия текстового файла

std::cin >> fname;

std::ifstream file(fname);

std::string text((std::istreambuf_iterator<char>(file)) ,std::istreambuf_iterator<char>());

file.close();

std::map<char, char> rs = {{'9', '0'}};

for (char i = '0'; i < '9'; ++i) rs.insert({ i,i+1 });

char r;

std::replace_if(text.begin(), text.end(), [&](char c) { return r = rs[c]; }, r);

std::ofstream out("result.txt");

out << text << std::endl;

out.close();

return 0;

}

0,0(0 оценок)
Ответ:
Zubactick
Zubactick
15.12.2021 22:52

var a,b,c,x,z: double;

begin

a:=4; b:=-1; c:=0;

while (a=4) do

 begin

 write('Введите a: ');

 readln(a);

 if (a=4) then writeln('a не может быть равно 4!');

 end;

while (b<=0) do

 begin

 write('Введите b: ');

 readln(b);

 if (b<=0) then writeln('b не может быть меньше или равно 0!');

 end;

while (c=0) do

 begin

 write('Введите c: ');

 readln(c);

 if (c=0) then writeln('c не может быть равно 0!');

 end;

x:=(7*a*b+(1/(c*c)))/(4-a);

z:=a+(x/sqrt(2*b));

writeln('x = ');

writeln(x);

writeln('z = ');

writeln(z);

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота