abadaeva
?>

Здравствуйте! Нужна с переводом проги из паскаля в С++ Заранее поиск максимального кратного 3 function Max(a:mtr;var k:byte):integer; var i, j, mx:integer; begin k:=0; mx:=-maxint-1; for i:=1 to n do for j:=1 to n do if (a[i, j] mod 3=0)and(a[i, i]>mx) then begin mx:=a[i, j]; k:=1 end; Max:=mx end; //вызов mx:=Max(a, k); if k=0 then writeln('Нет элементов кратных 3') else writeln('Максимальный, кратный 3=', mx);

Информатика

Ответы

andreevaalisa
Честно, не поняла ваш код вообще. Почему нет цикла? Предлагаю свое решение:
1)Cначала заполняем массив случайными числами от 2 до 5 (включительно)
2)Потом выводим его (Для проверки)
3) Потом считаем оценки. Но сначала нужно обнулить переменные( В самом начале это делали), а то получится кака (:

program N_0547847;
var
    b, c, d, f, i:integer;
    a: array [1..20] of integer;
begin;
randomize;
b:=0; c:=0; d:=0; f:=0;
for i:=1 to 20 do begin
  a[i]:=random(4)+2; 
  write(a[i],' '); end; 
writeln;
for i:=1 to 20 do begin
    if a[i]=2 then  b:=b+1;
    if a[i]=3 then  c:=c+1;
    if a[i]=4 then  d:=d+1;
    if a[i]=5 then   f:=f+1;
end;
writeln('Двоек: ', b); 
writeln('Троек: ', c); 
writeln('Четверок: ',d);
writeln('Пятерок: ',f);
end.   
mausgaly

import java.util.Scanner;

public class Authenticator {

public static void main(String[] args) {

 String login;

 String password;

 Scanner scan = new Scanner(System.in);

 

 System.out.println("login:");

 login = scan.next();

 System.out.println("password:");

 password = scan.next();

 

 if(login.equals("user") && password.equals("qwerty")){

  System.out.println("Authentication completed");

 }else{

  System.out.println("Invalid login or password");

 }

 

 scan.close();

 

}

}

Объяснение:

Краткий алгоритм этой программы:Импортируем класс Scanner(для ввода текста);В методе main создаем две переменные типа String и одну типа Scanner;Вводим значения при а;Если логин и пароль верны,то выводим Authentication completed. Иначе выводим Invalid login or password;Закрываем Scanner;

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Здравствуйте! Нужна с переводом проги из паскаля в С++ Заранее поиск максимального кратного 3 function Max(a:mtr;var k:byte):integer; var i, j, mx:integer; begin k:=0; mx:=-maxint-1; for i:=1 to n do for j:=1 to n do if (a[i, j] mod 3=0)and(a[i, i]>mx) then begin mx:=a[i, j]; k:=1 end; Max:=mx end; //вызов mx:=Max(a, k); if k=0 then writeln('Нет элементов кратных 3') else writeln('Максимальный, кратный 3=', mx);
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Yurevna419
Talikova164
buff-studio
Гарик383
Васенкова204
maestro6838
Kuzminastia20038
azarovaelena19812
Batishcheva
Валиахметова
milaudina
merzlikinairena
xalina85
info122
egoryuzbashev