Регистрация
АлексейМв
01.10.2022 18:21
Информатика
Есть ответ 👍

Расставить недостающие фрагменты программы так, чтобы в результате получилось решение задачи: Найти сумму чисел от 10 до 100.
Var S, x: integer;
Begin
;
x=;
while do
begin
S:=;
x:=
end;
write();
end.

S x x S:=0 x+1 S+x x>100 10

264
452
Посмотреть ответы 1

Ответы на вопрос:

mikhdina24
mikhdina24
4,6(1 оценок)

Типа такого

using System;

using System.IO;

using System.Windows.Forms;

...

[STAThread]

static void Main() {...}

...

Func ( )

{

 using (OpenFileDialog dlg = new OpenFileDialog())

 {

   dlg.ShowDialog();

   var file = new StreamReader(dlg.OpenFile()).ReadToEnd();

   int CtNum = 0, CtRus = 0;

   for (int i = 0; i < file.Length; i++)

     if (file[i] >= 'А' && file[i] <= 'я') CtRus++;

     else if (file[i] >= '0' && file[i] <= '9') CtNum++;

   Console.WriteLine(

   CtNum>CtRus? "More nums" : CtNum<CtRus? "More Rus letters" :  

   "Equal number of Rus letters and nums");

 }

}

Популярно: Информатика