// pascalabc.net 3.3, сборка 1583 от 25.11.2017 // внимание! если программа не работает, обновите версию! begin var s: =readlnstring.toupper; // к верхнему регистру var (ko,ke): =(0,0); // счетчики for var i: =1 to s.length do case s[i] of 'о': ko+=1; 'е': ke+=1 end; if ko> ke then writeln('буква "о" встречается чаще') else if ko< ke then writeln('буква "е" встречается чаще') else writeln('буквы "о" и "е" встречаются одинаковое число раз') end. пример если бы ольга захотела, она бы училась лучше елены буква "е" встречается чаще
Li-111
03.11.2020
Ответ: 17 // delete.cpp: определяет точку входа для консольного приложения.// #include "stdafx.h"#include "iostream"#include < conio.h> using namespace std; int count_ = 0; char m[6][6] = { {'s', '.', '.', '.', '#', '#'}, { '#', '.', '#', '.', '.', '.' }, { '.', '.', '#', '.', '.', '#' }, { '.', '.', '#', '#', '#', '.' }, { '#', '.', '.', '.', '#', '#' }, { '#', '#', '#', '.', '.', 'f' }}; int find_p(int x, int y) { if (x < 0 || x > 5 || y < 0 || y > 5) return 0; if (m[y][x] == 'f') return 1; if (m[y][x] ! = '.' & & m[y][x] ! = 's') return 0; m[y][x] = '+'; count_++; if (find_p(x, y - 1)) return 1; if (find_p(x + 1, y)) return 1; if (find_p(x, y + 1)) return 1; if (find_p(x - 1, y)) return 1; m[y][x] = 'x'; return 0; } int main(){ find_p(0, 0); cout < < count_; //вывод _getch(); // задержка return 0; }
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Перевести в шестнадцатеричную, восьмеричную и двоичную системы счисления десятичное число 1260
вообщем.. восьмеричную - 2354 ; двоичную - 10011101100 ; в шестнадцатиричную - 4ес.